Question

ПОМОГИТЕ! Посчитайте сумму по следующему правилу s= 0+1+2*2+3*3*3+4*4*4*4 (и так от 0 до 10). Составить программу паскаль

Answer 1

var
s: integer;

Begin
for var i := 1 to 10 do
s := s + power(i,i);
write(s);
end.