200—500间,能被13整除但不能被17整除的数的个数VBbiancheng

题目

200—500间,能被13整除但不能被17整除的数的个数VBbiancheng

答案

VB语法忘了,给伪代码
i=0;
for n = 200 to 500
if (n mod 13 == 0 )&&(n mod 17 0) then
i=i+1;
print i;