y={x+50,1<x, 2x+20,x<1 0,x<1 немесе

ПолЕчка11117 ПолЕчка11117    3   19.04.2020 17:13    0

Ответы
lskurs lskurs  13.10.2020 11:55

// PascalABC.Net

var x, y: integer;

begin

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

   readln(x);

   if x > 1 then

       y := x + 50;

   if x < 1 then

       y := 2*x + 20;

   if (x < 1) or (x > -1) then

       y := 0;

   writeln('y = ', y);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика