Hãy đếm xem có bao nhiêu số nguyên (không âm) không vượt quá N mà số đó chia hết cho a mà không chia hết cho b hoặc chia hết cho b mà không chia hết cho a. Dữ liệu vào: gồm 3 số nguyên dương N, a, b (các số cách nhau ít nhất 01 ký tự trống). Dữ liệu ra: gồm 1 số duy nhất cần tìm. Yêu cầu: 0<a,b<N<10^12 . vd input 10 2 3 output 6
1 câu trả lời
uses crt;
var n,a,b:qword;
function gcd(a,b:qword):qword;
begin
while a*b <> 0 do
begin
a:=a mod b;
if a <> 0 then b:=b mod a;
end;
exit(a+b);
end;
begin
clrscr;
readln(n,a,b);
writeln((n div a) + (n div b) - (n div (a*b div gcd(a,b))) - 1);
readln;
end.
Câu hỏi trong lớp
Xem thêm
