Цитата:
Сообщение от Viachka
А правильно ли будет сделать вот так:
function f(z : byte) : real; begin if (z <= 1) then f := 1 else f := f(z - 1) * z; end;
И ищё вопрос как правильно вывести результат на экран.
|
Правильно. Но это всего лишь рекурсивная функция вычисления факториала.
1. И что Вы с ней делать собираетесь?
2. А зачеркивать-то зачем?
3. Какой результат Вы собираетесь выводить?