составьте программу, которая будет определять положительное или отрицательное введённое пользователем число. (программа турбо паскаль)

Question

Толюня

7 апреля, 02:53

+4

Ответы (1)

Знаете ответ на вопрос?

Мика · Answer 1

program w7w7;

var a:real;

begin

readln (a) ;

if a<0 then writeln ('otritsatelnoe chislo') ;

if a>0 then writeln ('pologitelnoe chislo') ;

end.