Viết công thức nhập 2 số nguyên m và n từ bàn phím.In ra màn hình thông báo :"m lớn hơn n",''m nhỏ hơn n'',hay'''m bằng n''.

Lời giải:

uses crt;
var m,n:longint;
begin
    clrscr;
    writeln('Nhap 2 so nguyen m va n');read(m,n);
    if (m=n) then writeln('m bang n') else
    if (m<n) then writeln('m nho hon n') else writeln('m lon hon n');
    readln
end.

___________________________________

#ntt6