Viết chương trình nhập 1 số từ bàn phím và kiểm tra xem số đó là số dương hay âm. 08/08/2021 Bởi Eva Viết chương trình nhập 1 số từ bàn phím và kiểm tra xem số đó là số dương hay âm.
program ct; uses crt; var n:integer; begin clrscr; write(‘Nhap mot so: ‘); readln(n); if n>0 then writeln(‘So duong’) else writeln(‘So am’); readln; end. Học tốt! Bình luận
program ct; uses crt; var n:integer; begin clrscr; write(‘nhap n:=’);readln(n); if n>0 then writeln(n,’ la so duong’) else writeln(n,’ la so am’); readln end. Bình luận
program ct;
uses crt;
var n:integer;
begin clrscr;
write(‘Nhap mot so: ‘); readln(n);
if n>0 then writeln(‘So duong’)
else writeln(‘So am’);
readln;
end.
Học tốt!
program ct;
uses crt;
var n:integer;
begin
clrscr;
write(‘nhap n:=’);readln(n);
if n>0 then writeln(n,’ la so duong’) else writeln(n,’ la so am’);
readln
end.