Предмет: Информатика,
автор: MarfaJon
ЛЮДИ ПОЖАЛУЙСТА ПОМОГИТЕ. НАДО СДЕЛАТЬ программу, блок схему и ручной просчет
Приложения:
![](https://files.topotvet.com/i/7fa/7fa0ff7d20d3bc75caa5265c8e5b6f30.jpg)
Ответы
Автор ответа:
0
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.
n, i, j: byte;
s: longint;
begin
readln(n);
for i := 1 to n do
s := round(s + power(i, n));
writeln(s);
end.
Приложения:
![](https://files.topotvet.com/i/830/830000eefc917877f61e43cbd700ce92.bmp)
![](https://files.topotvet.com/i/e07/e07446bc7c8644373a7d2ad0aa87badd.png)
Похожие вопросы
Предмет: Английский язык,
автор: Аноним
Предмет: Алгебра,
автор: yunii
Предмет: Английский язык,
автор: mirali250999
Предмет: Математика,
автор: rashirivlad
Предмет: Математика,
автор: ЮляВасильева94