题目描述
牛牛以前在老师那里得到了一个正整数数对(x, y), 牛牛忘记他们具体是多少了。但是牛牛记得老师告诉过他x和y均不大于n, 并且x除以y的余数大于等于k。牛牛希望你能帮他计算一共有多少个可能的数对。
解法:
clc;
clear all;
close all;
n = input('请输入n=');
k = input('请输入k=');
answer = 0;
for y = k:n
%除数是y,余数会以 1,2,3...(y-1),0 的方式循环出现,fix(n/y)代表该循环出现的次数;
%但该循环里只有大于k的部分才是我们所需要的,因此用(y-k)取出大于k的循环部分;
res = fix(n/y) * (y-k);
%接下来处理 1,2,3...(y-1),0 不满一个循环的情况
%n除以y的余数小于k的情况不符合题意,不做考虑
if mod(n,y) >= k
%k不等于0的情况
if k > 0
res = res + mod(n,y)- k + 1;
%k等于0的情况
else
res = res + mod(n,y);
end
end
answer = answer + res;
end
disp('符合要求的数对(x,y)个数为:');
disp(answer);
测试
请输入n=5
请输入k=2
符合要求的数对(x,y)个数为:
7