program Test;
var
a: Real;
begin
Write ('Введите число: ');
ReadLn (a);
if a > 0 then
WriteLn ('Число положительно')
else if a < 0 then
WriteLn ('Число отрицательно')
else
WriteLn ('Число равно 0');
ReadLn;
end.
Python:
a=int(input())
If a<0:
print("Число", a, " - отрицательное")
program Test;
var
a: Real;
begin
Write ('Введите число: ');
ReadLn (a);
if a > 0 then
WriteLn ('Число положительно')
else if a < 0 then
WriteLn ('Число отрицательно')
else
WriteLn ('Число равно 0');
ReadLn;
end.
Python:
a=int(input())
If a<0:
print("Число", a, " - отрицательное")