pow(a,b) - возведение a в степень b
pow(m,1.0/3)
Program programma;
Uses crt;
var n,s,i: integer;
Begin clrscr;
write('Введите число N = ');
readln(n);
write('S=');
for i:=1 to n-1 do
begin
s:=s+sqr(i);
write(sqr(i),'+');
end;
s:=s+sqr(n);
write(sqr(n),'=', s);
End.