Предмет: Информатика,
автор: invisibl20lose
ПОМОГИТЕ ПОЖАЛУЙСТА!!
Приложения:
Ответы
Автор ответа:
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.
Похожие вопросы
Предмет: Английский язык,
автор: alisagrosu
Предмет: Русский язык,
автор: Anna200511111111
Предмет: Русский язык,
автор: УмникЗнаний
Предмет: Физика,
автор: ПОЕДАТЕЛЬЗНАНИЙ1
Предмет: Обществознание,
автор: daurenzhumanov15