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

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.