Viết chương trình nhập vào một số nguyên và cho biết số đó là số âm hay số dương?
2 câu trả lời
Program bai 1;
uses crt;
var a:integer;
begin
clrscr;
write('nhap so a =');
readln(a);
if a> 0 then writeln('a la so duong ') else
writeln('a la so am ');
readln;
end.
@Nguyenmill