Viết chương trình nhập từ bàn phím 2 số m n nguyên dương tính và hiển thị ra màn hình tổng, hiệu, tích,thương của 2 số theo quy cách sau nhập m và n: 10 và 5 Tổng m +n =15 Hiệu m-n = 50 Tích m*n = 50 Thương m div n = 2

program ting;
uses crt;
var m, n : integer;
begin
clrscr;
write('nhap so nguyen duong m :');readln(m);
write('nhap so nguyen duong n :');readln(n);
writeln('tong cua hai so la :', m+n);
writeln('hieu cua hai so la :', m-n);
writeln('tich cua hai so la :', m*n);
writeln('thuong  cua hai so la :', m div n);
readln
end.

Program baitap;

Uses crt;

Var m,n:integer;

Begin

Clrscr;

Write('Nhap m,n'); Readln(m,n);

Writeln('Tong m+n=',m+n);

Writeln('Hieu m-n=',m-n);

Writeln('Tich m*n=',m*n);

Writeln('Thuong m div n=',m div n);

Readln

End.