Bài tập số 5. Nhập 2 số nguyên a và b. Hãy in ra kết quả phần nguyên và phần dư của phép chia a cho b. (Div và mod)
2 câu trả lời
var a,b:longint;
begin
write('Nhap vao a = ');readln(a);
write('Nhap vao b = ');readln(b);
if b=0 then
begin
writeln('Khong thuc hien duoc');
readln;
exit;
end;
writeln('Phep DIV = ',a div b);
writeln('Phep MOD = ',a mod b);
readln
end.
program bai_giai;
uses crt;
var a,b:longint;
begin
clrscr;
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
if b=0 then write('Thuc hien khong duoc')
else
begin
writeln('Phan nguyen: ',a div b);
writeln('Phan du: ',a mod b);
end;
readln;
end.
Câu hỏi trong lớp
Xem thêm