с информатикой . Составьте программу по заданию


с информатикой . Составьте программу по заданию

elena0795 elena0795    3   21.01.2021 20:32    2

Ответы
Дурашка008 Дурашка008  20.02.2021 20:32

var

   x, y: integer;

begin

   Readln(x);

   if x < -50 then

       y := 7 * x * x;

   if (x > -50) and (x < 50) then

       y := Abs(3 * x)

   else

       y := x * x * x;

   Writeln('y = ', y);

end.

Объяснение:


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

Популярные вопросы