var
sum, i: integer;
begin
sum := 0;
for i := 1 to 100 do
if i mod 2 <> 0 then sum += sqr(i);
end;
writeln(sum);
end.
var
sum, i: integer;
begin
sum := 0;
for i := 1 to 100 do
begin
if i mod 2 <> 0 then sum += sqr(i);
end;
writeln(sum);
end.