ввести три числа а б с. напечатать все отрицательные числа
в Паскале

а можно в столбик написать? так не очень понятно

а, все , вижу

спасибо :з

var a,b,c:real;beginwrite('a = '); readln(a);write('b = '); readln(b);write('c = '); readln(c);writeln('Отрицательные числа:');if a<0 then write(a:4);if b<0 then write(b:4);if c<0 then write(c:4);end.Пример:a = -17b = 15c = -28Отрицательные числа:  -17 -28