KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
Viết chương trình Pascal, số sánh 2 số nguyên tùy ý.
By Julia
Viết chương trình Pascal, số sánh 2 số nguyên tùy ý.
var a,b:integer; begin clrscr; write(‘Nhap a,b: ‘); readln(a,b); if a>b then write(a,’ lon hon ‘,b) else if a<b then write(a,’ nho hon ‘,b) else if a=b then write(a,’ bang ‘,b); readln; end.
var a,b:integer;
begin
clrscr;
write(‘Nhap a,b: ‘); readln(a,b);
if a>b then write(a,’ lon hon ‘,b)
else if a<b then write(a,’ nho hon ‘,b)
else if a=b then write(a,’ bang ‘,b);
readln;
end.
uses crt;
var a,b: integer;
begin
clrscr;
write (‘nhap so thu nhat: ‘); readln (a);
write (‘nhap so thu hai: ‘); readln (b);
if a>b then writeln (‘a>b’);
if a<b then writeln (‘a<b’);
if a=b then writeln (‘a=b’);
readln;
end.