Даны три числа a, b, c. определить, есть ли среди них отрицательные, и вывести сообщение на экран.

Question

Даны три числа a, b, c. определить, есть ли среди них отрицательные, и вывести сообщение на экран.

Экономика

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a,b,c:integer;beginreadln(a);readln(b);readln(c);if (a<0) or (b<0) or (c<0) then writeln('Отрицательные есть!') elsewriteln('Отрицательных нету!');end.