Ввести ри числа a,b,c. напечатать все отрицательные числа в программе Паскаль

Ввести ри числа a,b,c. напечатать все отрицательные числа в программе Паскаль
Гость
Ответ(ы) на вопрос:
Гость
Var a,b,c: integer; begin   writeln('Введите числа');   readln(a,b,c);   if a<0 then writeln(a,' отрицательное');   if b<0 then writeln(b,' отрицательное');   if c<0 then writeln(c,' отрицательное'); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы