ЛЮДИ ПОЖАЛУЙСТА ПОМОГИТЕ. НАДО СДЕЛАТЬ программу, блок схему и ручной просчет

Ответ

Автор - HRAshton

var
n, i, j: byte;
s: longint;

begin
readln(n);
for i := 1 to n do
s := round(s + power(i, n));
writeln(s);
end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.