Запиши программу на языке Паскаль для: y=
⎪0,еслиx≤0
x,если0 x(Во второй степени) ,если x>1. (y:3:0)
Запусти программу и введи значение x=−3.

Число выведенное на экран

Если ввести x = -3, то программа выведет число 0.

ответ: 0

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

var x: integer;

y: real;

begin

   write('Введите x: ');

   readln(x);

   if x <= 0 then

       y := 0;

   if x = 0 then

       y := x;

   if x > 1 then

       y := x * x;

   writeln('y = ', y);

end.