Зертханалық жұмыс

| { n факториал санына тең fact қойыңыз}

begin

| if n=1 then begin

| end else begin {n>1}

| | factorial (n-1, fact);

| | {fact = (n-1)!}

| | fact:= fact*n;

| end;

Процедура-функцияларды падаланып төмендегідей жазамыз:

begin

| | factorial:=1;

| end else begin {n>1}

| | factorial:= factorial (n-1)*n;

end;
Функцияның ішкі сипатында factorial атынын екі жақтылықта пайдалануына ерекше көңіл бөліңіз ол айнымалы және шақырылатын рекурсивті функцияларды белгілейді.Біздің жағдайда олар атынан кейін жақшамен айрылып тұр, ал егер функция параметірсіз болса, қиын болатын еді. (Стандарттық, бірақ қиын табылатын қателер болып тұрады, егер бағдарлама авторы айнымалы мағынасын пайдаланатын болса, онда компиляторды бұл жерде рекурсивті шақырылым ретінде көреді).

Бағдарламаның рекурсивті көтерілуін толық кері деңгейде жазыңыз.

Төменгі төбе түбір деп аталады.Әр төбеден екі сызық таралуы мүмкін: солға жоғары және оңға жоғары. Төбелер сызықтарынын баратын жерін төбелердің бастапқы сол және оң жақ ұлдары деп атайды. Төбенің екі ұлы болуы мүмкін, кей кезде бір ұлы болады (сол және оң жақ). Оның ұлдары болмауы да мүмкін, бұл жағдайда оны парақ деп атайды.

Келесі есептерде бұтақ төбелері толық оң сандармен нөмірленген.