5到300之间能被7整除的数的平方和

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/23 23:01:44
5到300之间能被7整除的数的平方和5到300之间能被7整除的数的平方和5到300之间能被7整除的数的平方和哪个语言啊?如果是pascal的话programsum;varsum:int64;i:sho

5到300之间能被7整除的数的平方和
5到300之间能被7整除的数的平方和

5到300之间能被7整除的数的平方和
哪个语言啊?
如果是pascal的话
program sum;
var sum:int64;
i:shortint;
begin
i:=5;
repeat
if i mod 7=0 then
sum:=sum+sqr(i);
inc(i);
until i>300;
writeln(sum);
end.