Hoán vị 2 số
Nhập 2 số nguyên a,b hoán vị 2 số khi a>b.
Quảng cáo
2 câu trả lời 593
3 năm trước
uses crt;
var a,b,tg:integer;
BEGIN
clrscr;
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if a>b then
begin
tg:=a;
a:=b;
b:=tg; {tg có nghĩa là trung gian nha}
end;
writeln(a,' ',b);
readln;
END.
3 năm trước
uses crt;
var a,b,tg:integer;
BEGIN
clrscr;
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if a>b then
begin
tg:=a;
a:=b;
b:=tg; {tg có nghĩa là trung gian nha}
end;
writeln(a,' ',b);
readln;
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
4101
-
3687
-
3219
Gửi báo cáo thành công!
