Question

giúp em viết chương trình ngày với ạ: nhập M, n , in so sánh M>n? M<n? M= n?

 

Answer 1

uses crt;

var m,n:integer;

begin

clrscr;

readln(m,n);

if m<n then write('m nho hon n')

else if m>n then write('m lon hon n')

else write('m bang n');

readln;

end.