Напишите рекурсивную функцию, которая раскладывает число на обыкновенные сомножители.

Язык написания - pascal

Занятно: факторизация чисел - одна из не самых обычных вычислительных задач

А еще - традиционная функция в данном случае не может быть рекурсивной, потому что она обязана и возвращать значение, и одновременно поменять значение своего параметра, а поменять несколько значений - это теснее свойство не функции, а процедуры.

Даю Вам задание слово в слово, как написано у меня. От себя ни чего не прибавляю

А к Для вас претензий нет. Наберите на веб-поисковике запрос "метод разложения числа на обыкновенные множители" - и Вы поймете, какую головную боль Для вас задали.

Посодействовать можете?

Как досадно бы это не звучало, нет, поэтому что не разумею, как тут сделать рекурсивную ФУНКЦИЮ. Она тут никаким боком не нужна.

Эх, у меня та же неувязка, без рекурсии сделать могу, а с ней уже препядствия =(

Вариант без рекурсии - как просил позднее

function factorization ( numeric: integer ): integer;
var d: integer;
begin
write(numeric, ' = 1');
d := 2;
while numeric gt; 1 do
begin
if numeric mod d = 0 then
begin
write (' * ', d);
numeric := numeric div d;
end
else inc(d);
end;
end;
var x: integer;
begin
write('Введите число: ');
readln(x);
factorization(x);
end.