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

Question

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

Экономика

Гость

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

Accepted Answer

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.