40 БАЛЛОВ! Какую задачу решает данная программа?
var i: integer; s: real;
begin
for i:= 2 to 60 do s:= s+i/2;
write (s) ;
end.