Информатика. програмирование. паскаль.

Question

Информатика. програмирование. паскаль.

---

Answer 1

Var
   i,y:integer;
begin
   y:=0;
   for i:=1 to 25 do
      y:=y+i*2;
   writeln('y=',y);
end.