Страница 29-30 параграф 1.2 вопрос 7, ГДЗ по информатике за 9 класс к учебнику Босовой за 2023 год Просвещение

program Z_1_2_7;var sum, i, n: integer;function f(m: integer): integer;var s, j: integer;begin s := 1; for j := 1 to m do s := s * j; f := s;end;begin sum := 0; write('Введите n >> '); readln(n); for i := 1 to n do sum := sum + f(i); writeln('Сумма факториалов = ', sum);end.