Напишите программу вычисления суммы квадратов всех натуральных двузначных чисел, кратных 5
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var a,s,i:integer;
begin
s:=0;
for i:=10 to 99 do begin
if (i mod 5=0) then s:=s+sqr(i);
end;
writeln(s);
end.
: