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

Даны 4 вещественных числа,выведите на экран те из них,значение которых отрицательны.срочно нужно!!!
Гость
Ответ(ы) на вопрос:
Гость
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.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы