Введено число X , если оно больше нуля, то вывести надпись положительно , иначе вывести...

Question

Введено число X , если оно больше нуля, то вывести надпись положительно , иначе вывести надпись отрицательно
для паскаля

Answer 1

Program qq;
var x: real;
begin
readln (x);
if x>0 then writeln ('положительно')
else writeln ('отрицательно ');
end.