Информатика, вопрос задал gggg9850 , 7 лет назад

6 задние помогите пожалуйста срочноо​

Приложения:

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

Ответил farodis
0

var x:integer;

begin

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

readln(x);

if x<3 then

writeln('y = ',sqr(x))

else

if x>3 then

writeln('y = ',sqrt(x))

else

if x=3 then

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

end.

Новые вопросы