Предмет: Информатика,
автор: lins47
Запиши программу на языке Паскаль Для: y = 0 если x<= 0
x, если 0 < х <=1 (у:3:0)
x², если x>1
Запусти программу и Введи Значение: x = -10
Число выведенное на экран
Ответы
Автор ответа:
1
program usl_oper;
var
x, y : integer;
begin
write('x=');
read(x);
if x<=0 then
y:=0
else
if x<=1 then
y:=x
else
y:=sqr(x);
write('y=',y)
end.
Приложения:

Интересные вопросы
Предмет: Русский язык,
автор: itivfcnhjqcthdbc
Предмет: Русский язык,
автор: strelec12122003
Предмет: Русский язык,
автор: santmarina
Предмет: Математика,
автор: Аноним
Предмет: Алгебра,
автор: Sheva1ZNO