Даны 3 целых числа A B C. Значение чисел воодится с клавиатуры. Написать программу для решения следующей задачи. Вывести на экран неотрицательные числа (не меньше 0). тема: Логические основы программирования

Question

Мартин

15 марта, 22:05

+3

Ответы (1)

Знаете ответ?

Ианикит · Answer 1

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.