Даны 3 целых числа A B C. Значение чисел воодится с клавиатуры. Написать программу для решения следующей задачи. Вывести на экран неотрицательные числа (неменьше 0). тема: Логические основы программирования
var a,b,c:integer; Begin read(a,b,c); if a>=0 then writeln(a); if b>=0 then writeln(b); if c>=0 then writeln(c); End.