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

Question

Составьте программу, которая будет определять является ли введёное число положительно, при X=5,X=-7,X=0.

Answer 1

 program z1;
var x:integer;
begin
writeln('введите Х');
readln(X);
if x>0 then writeln('число положительное') else writeln('число не положительное');
end.