Опубликовано 22.08.2017 по предмету Информатика от Гость >> <<

Ввести ри числа 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.