1到100内被6或8整除的所有自然数的平方根的和

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/08 20:07:51

1到100内被6或8整除的所有自然数的平方根的和
1到100内被6或8整除的所有自然数的平方根的和

1到100内被6或8整除的所有自然数的平方根的和
var
i:integer;
s:real;
begin
s:=0
for i:=1 to 100 do
if i mod 6=0 or i mod 8=0 then s:=s+sqr(i);
writeln(s);
readln;
end.