CẦN GẤP mong mọi người giúp đỡ Lập trình từ bàn phím hai số nguyên M,N (M>N,M, N<=32000), tính và đưa ra màn hình : a, Tính thương (chia nguyên ) của hai số đó? b, Tính hiệu của hai số đó?

1 câu trả lời

program tinh;
uses crt;
var M, N, T, H : integer;
begin
clrscr;
write(' nhap so M va N :'); readln(M, N);
if (M < N) or (M > 3200) or (N > 3200) then
   writeln('nhap sai du lieu')
else 
   begin
   if (M > N) and (M <= 32000) and (N <= 32000) then
   T := M div N;
   H := M - N;
   writeln('thuong cua hai so la :', T);
   writeln('hieu cua hai so la :', H);
   end;
readln
end.

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