Книга: UNIX — универсальная среда программирования

3.7.2 ack1

3.7.2 ack1
func ack() {
 n = n+1
 if ($1 == 0) return ($2+1)
 if ($2 == 0) return (ack($1 - 1, 1))
 return (ack($1 - 1, ack($1, $2 - 1)))
}
n=0
while (read(x)) {
 read(y)
 print ack(x,y), "n"
}
print n,"n"

Содержание
3.7.1 ack
3.7.2 ack1
3.7.3 code.c
3.7.4 double
3.7.5 fac
3.7.6 fac1
3.7.7 fac2
3.7.8 fib
3.7.9 fib2
3.7.10 fibsum
3.7.11 fibtest
3.7.12 hoc.h
3.7.13 hoc.ms
3.7.14 hoc.y
3.7.15 init.c
3.7.16 makeapp
3.7.17 makefile
3.7.18 math.c
3.7.19 mbox
3.7.20 symbol.c
Оглавление статьи/книги
Похожие страницы

Генерация: 0.098. Запросов К БД/Cache: 2 / 0
поделиться
Вверх Вниз