Дано число D, является ли отрицательным?
Информатика за ранние

D = int(input('Введите число '))

if D < 0:

   print('Число отрицательное')

else:

   print('Число неотрицательное')

//pascal

var

d : real;

begin

readln(d);

if d > 0 then

writeln('Число положительное')

else if d < 0 then

writeln('Число отрицательное')

else if d = 0 then

writeln('Это ноль');

end.