напишите программку которая вычисляет сумму первых n естественных чисел

это все? а там же что то про число n

var s, i, n :integer;begins:=0;readln(n);for i:= 1 to n do s:=s+(i*i);writeln(s);end.в) var s, i, n :integer;begins:=0;readln(n);for i:= 1 to n dobeginif (i mod 2 = 0) then s:=s+i;end;writeln(s);end.г) var s, i :integer;begins:=0;for i:= 10 to 99 do s:=s+i;writeln(s);end.

там чтотоо не верно. где integer там пишет ожидался идентификатор

Чего

Там Integer в каком смысле ожидался индификатор