Question

Паскаль , помогите
Ввести число и вывести на экран сообщение о том, является ли это
число положительным, отрицательным или это число ноль. записать результат
в файл.

Answer 1

Var

n : integer

Begin

Writeln(n);

If n>0 then writeln('число положительное');

If n<0 then writeln('число отрицательное');

If n=0 then writeln('число равно нулю');

End.