a, b, c – фактические параметры
Program Factorial;
var n:integer;
function f(x:integer):real
begin
if x= 1 then f:= 1 else f:= x* f(x-1);
end;
begin
writeln('Введите число N(N=1..170)');
readln(n);
writeln('Факториал N!=',f(n));
end.
Рекурсивный стиль эффектен, но не эффективен!
Увеличивается время исполнения программы
Требует значительного объема памяти
Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.
Email: Нажмите что бы посмотреть