viết chương trình nhập vào hai số nguyên dương a và b khác nhau từ bàn phím và in lên màn hình theo thứ tự giảm dần
0 bình luận về “viết chương trình nhập vào hai số nguyên dương a và b khác nhau từ bàn phím và in lên màn hình theo thứ tự giảm dần”
Program NN; Uses crt; Var a,b: longint; Begin Clrscr; Write(‘Nhap a,b: ‘); Readln(a,b); If a=b then Write(‘Khong thoa man’); If a>b then Write(a,’ ‘,b); If b>a then Write(b,’ ‘,a); Readln End.
a) uses crt ; var a,b :integer; begin clrscr; writeln(‘nhap hai so a va b’); readln(a,b); if a=b then writeln(‘khong thoa man de bai ‘) else if a<b then writeln( ‘hai so do lan luot theo thu tu giam dan la ‘,b,a) else writeln( ‘hai so do lan luot theo thu tu giam dan la ‘,a,b); readln end.
Program NN;
Uses crt;
Var a,b: longint;
Begin
Clrscr;
Write(‘Nhap a,b: ‘); Readln(a,b);
If a=b then Write(‘Khong thoa man’);
If a>b then Write(a,’ ‘,b);
If b>a then Write(b,’ ‘,a);
Readln
End.
a) uses crt ;
var a,b :integer;
begin
clrscr;
writeln(‘nhap hai so a va b’);
readln(a,b);
if a=b then writeln(‘khong thoa man de bai ‘) else
if a<b then writeln( ‘hai so do lan luot theo thu tu giam dan la ‘,b,a) else writeln( ‘hai so do lan luot theo thu tu giam dan la ‘,a,b);
readln
end.