cho 2 số nguyên x,y.Đưa ra mối quan hệ giữa x và y(lớn hơn, bé hơn, bằng nhau) (bài toán và thuật toán) Giải giúp mình vs mình đang cần gấp

2 câu trả lời

Uses crt;
Var a,b: longint;
Begin
        Clrscr;
        Write('Nhap 2 so a va b: '); Readln(a,b);
        If a>b then Write(a,'>',b);
        If a<b then Write(a,'<',b);
        If a=b then Write(a,'=',b);
        Readln
End.

program hotboy;

uses crt;

var x,y : integer;

begin

clrscr;

write('nhap so x');readln(x);

write('nhap so y'); readln(y);

if x>y then writeln('x>y');

if x=y writeln('x=y');

if x<y writeln('x<y');

readln

end.

thuật toán

buơcs 1: nhập hai số x,y

bước 2

nếu x>y thì in ra x>y

nếu x<y thì in ra x<y

nếu x=y thì in ra x=y

bước 3:in ra kết quả và kết thúc thuật toán

Câu hỏi trong lớp Xem thêm