Регистрация
hayatuzun00
27.06.2022 13:17
Информатика
Есть ответ 👍

Составить программы для этих двух

241
336
Посмотреть ответы 2

Ответы на вопрос:

EinLegoMan
EinLegoMan
4,4(77 оценок)

1) var

y,x: real;

begin

writeln('введите значение x: ');

readln(x);

y: =5/(2*sqr(x)-50);

writeln('y = ',y);

end.

2) var

y,x: integer;

begin

writeln('введите значение x: ');

readln(x);

writeln('введите значение y: ');

readln(y);

if x> y then

begin

writeln('x*2 = ',x*2)

end

else

if (x

begin

writeln('x*2 = ',x*2);

writeln('y*2 = ',y*2);

end;

end.

YungTrappa1
YungTrappa1
4,5(1 оценок)

информатика- довольно быстро развивающаяся и востребованная в нашем сегодняшнем мире наука.

В 21 веке появилось очень много электронных устройв, телефонов, компьютеров, возникла потребность создавать новые модели, совершенствовать их, добавлять новые функции, создавать различные приложения, от игр до калькулятора. Всеми этими вопросами занимается информатика.

Популярно: Информатика