• Предмет: Информатика
  • Автор: invisibl20lose
  • Вопрос задан 5 лет назад

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

Приложения:

Ответы

Ответ дал: 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.

Вас заинтересует