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

ПОМОГИТЕ ПОЖАЛУЙСТА!!

Приложения:

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

Ответил Ziorar
0

Результат, который выведет программа (число ноль, и если применять форматирование, которое там указано, то слева ещё и два пробела):

 0

Сама программа:

var x,y: real;

begin

write('x= ');

read(x);

if x<=0 then y:=0

else if x>1 then y:=x*x

else y:=x;

write(y:3:0);

end.

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