N — натуральное число. Вычислить [latex] 1^{1}+2 ^{2}+...N ^{N} [/latex] (Pascal). Использовать цикл в цикле.
N — натуральное число. Вычислить [latex] 1^{1}+2 ^{2}+...N ^{N} [/latex] (Pascal). Использовать цикл в цикле.
Гость
Ответ(ы) на вопрос:
Гостьvar
i, j, n, sum, mult: integer;
begin
read(n);
for i := 1 to n do
begin
mult := 1;
for j := 1 to i do
mult := mult * i;
sum := sum + mult;
end;
writeln(sum);
end.
Не нашли ответ?
Похожие вопросы