Знаходження факторіала натурального числа

алг нат ФКТРЛ ( нат ДО )

ФКТРЛ(3)=?

ФКТРЛ(2)=?

ФКТРЛ(1)=?

нач

якщо ДО = 1

3 = 1 ?

2 = 1 ?

1 = 1 ?

те знач := 1

знач:=1

інакше знач :=ФКТРЛ(ДО-1)*ДО

знач:=1*2*3

знач:=1*2

всі

кін

алг БИД ( вещ Р, ДО, М )

6, 7

7, 3

арг Р, ДО

рез М

нач

якщо Р  ДО

6  7 ?

7  3 ?

те М := Р

М = 7

інакше М := ДО

М = 7

всі

кін

алг БІТ ( вещ А, В, З, В )

6, 7, 3

арг А, В, З

рез В

нач вещ Х

БИД (А, В, Х)

Х = 7

БИД (Х, З, В)

В =7

кін

алг Сума (вещ таб А[1:3], вещ ІЗ)

арг А

рез ІЗ

нач цілий ДО

К:= 1

ДО = 1

С:= 0

З = 0

поки ДО  3

1 3 ? (так)

2  3 ? (так)

3  3 ? (так)

4  3 ? (немає)

нц

С:= З + А[ДО]

З=А[1]

З=А[1]+A[2]

З=А[1]+A[2]+A[3]

К:= ДО + 1

K=2

K=3

K=4

кц

кін