Составьте программу, которая сравнивает два целых числа введенных с клавиатуры - положительное и отрицательное и выводит положительное число на экран

Question

Федяня

1 июня, 00:21

+1

Ответы (1)

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

Олдама · Answer 1

Var a, b:real;

begin

readln (a, b) ;

if a<0 then

writeln (a) ;

if b<0 then

writeln (b) ;

end.