Напишите программу, которая запрашивает целое число и определяет, является оно положительным, отрицательным или нулем.

Question

Эйнара

20 мая, 00:08

+5

Ответы (1)

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

Елизавет · Answer 1

var n:integer;

begin

write ('n=') ;

read (n) ;

if (n>0) then write ('n>0') ;

if (n<0) then write ('n<0') ;

if (n=0) then write ('n=0') ;

end.