Страница 101-107 §2.4 номер 7, ГДЗ по информатике за 9 класс к учебнику Босовой
Информатика 9 класс 9класс
ГДЗ к учебнику по информатике за 9 класс Босовой. Решения к номерам
Ответ и решение
program z_7;var n, i: integer; s: longint;function fa(a: integer): longint;begin if a = 1 then fa := 1 else fa := a * fa(a - 1);end;begin write('введи число>>'); readln(n); s := 0; for i := 1 to n do s := s + fa(i); writeln('Результат = ', s)end.