Даны 4 вещественных числа,выведите на экран те из них,значение которых отрицательны.

sashakoshelem sashakoshelem    1   01.04.2019 12:00    5

Ответы
muamy muamy  28.05.2020 05:28

var

  a, b, c, d : real;

begin

  read (a, b, c, d);

  if a < 0 then writeln (a);

  if b < 0 then writeln (b);

  if c < 0 then writeln (c);

  if d < 0 then writeln (d);

end.

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