Question

Информатика. Паскаль. Написать программу S=2+4+6+8+...+200

Answer 1

var s, i, n: integer;begins:=0;n:=0;  for i:= 1 to 100 do  begin   n:= n+2;   s:= s+n;   end;  writeln(s);end.

Answer 2

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