Question

var s, n: integer;
begin
s := 0;
for n := 2 to 6 do
s := s + 2 * n;
writeln(s);
end.

Answer 1

s = 0 + 2 * 2; 4

s = 4 + 2 * 3; 10

s = 10 + 2 * 4; 18

s = 18 + 2 * 5; 28

s = 28 + 2 * 6; 40

s = 40.