uses crt;

var a:integer;

begin

clrscr;

write('Nhap a='); readln(a);

if a<0 then writeln(a,' la so am')

else if a>0 then writeln(a,' la so duong')

else writeln(a,' khong la so am cung khong la so duong');

readln;

end.

Cho CTLHN với

Hi, Python nhé

------------------------------------------------------

a = int(input('Nhập vào 1 số nguyên: '))
if a > 0:
    print(f'{a} là số dương')
else:
    print(f'{a} là số âm')

--------------------------------------------------------