program SumOfSeries;
vari, n, power, sum: integer;
beginn := 21;power := 5;sum := 0;
for i := 1 to n dobeginsum := sum + round(power);power := power + 2;end;
writeln('Sum of the series is: ', sum);end.
program SumOfSeries;
var
i, n, power, sum: integer;
begin
n := 21;
power := 5;
sum := 0;
for i := 1 to n do
begin
sum := sum + round(power);
power := power + 2;
end;
writeln('Sum of the series is: ', sum);
end.