giups ;In ra phần chục và đơn vị của một số nguyên n có 2 chữ số. Với n nhập vào từ bàn phím. ( div và mod)
2 câu trả lời
program p;
var n:integer;
begin
readln(n);
writeln(n div 10);
writeln(n mod 10);
readln();
end.
program baitap;
uses crt;
var n:longint;
begin
clrscr;
readln(n);
writeln('Phan chuc = ',n div 10);
writeln('Phan don vi = ',n mod 10);
readln;
end.
Câu hỏi trong lớp
Xem thêm