Anarantrius 23 октября 2019 в 04:17

Решение задачи на использование вложенных циклов
Буду рад, если увижу решение данной задачи.

Var  i,j,n,sum,a:integer;begin  readln(n);  for i:=1 to n do  begin    a:=1;    for j:=1 to i do      a:=a*i;    sum:=sum+a;  end;  writeln(sum);end.
Компьютеры и вычисления
Для комментирования необходимо зарегистрироваться на сайте