Hướng dẫn giải của DIV A AND B
Chỉ dùng lời giải này khi không có ý tưởng, và đừng copy-paste code từ lời giải này. Hãy tôn trọng người ra đề và người viết lời giải.
Nộp một lời giải chính thức trước khi tự giải là một hành động có thể bị ban.
Nộp một lời giải chính thức trước khi tự giải là một hành động có thể bị ban.
Tác giả:
Sử dụng công thức.
Bình luận
var n,a,b:longint; begin read(n,a,b); write(n div (a*b)); end.
Bình luận này đã bị ẩn vì có quá nhiều phản ứng tiêu cực. Nhấn để xem.
var n,a,b,t:int64; function bcnn(x,y:int64):int64; var sd:longint; begin t:=x*y; while y<>0 do begin sd:=x mod y; x:=y; y:=sd; end; exit(t div x); end; begin read(n,a,b); write(n div bcnn(a,b)); end. coems:))