Запишите в паскале у = 0,еслиx≤0x,если0x2(Во второй),если x>1запусти программу и введи...

Question

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

Comments

Во первых лучше напиши на листочке и отправь, так не очень понятно. Во вторых тебе нужно и сама программа и число, или только то, что он выведет

Answer 1

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

Ответ: 0

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

var x: integer;

y: real;

begin

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

   readln(x);

   if x

       y := 0;

   if x = 0 then

       y := x;

   if x > 1 then

       y := x * x;

   writeln('y = ', y);

end.