Форма входа
0/0
UNIX — универсальная среда программирования - Керниган Брайан Уилсон
- Дата:16.04.2025
- Категория: Компьютеры и Интернет / Интернет
- Название: UNIX — универсальная среда программирования
- Автор: Керниган Брайан Уилсон
- Просмотров:0
- Комментариев:0
Уважаемые читатели!
Тут можно читать бесплатно UNIX — универсальная среда программирования - Керниган Брайан Уилсон. Жанр: Интернет. Так же Вы можете читать полную версию (весь текст) онлайн книги без регистрации и SMS на сайте Knigi-online.info (книги онлайн) или прочесть краткое содержание, описание, предисловие (аннотацию) от автора и ознакомиться с отзывами (комментариями) о произведении.
Описание онлайн-книги UNIX — универсальная среда программирования - Керниган Брайан Уилсон:
Читем онлайн UNIX — универсальная среда программирования - Керниган Брайан Уилсон
Шрифт:
-
+
Интервал:
-
+
Закладка:
Сделать
if ($1 > 1) {
double($1/2)
}
print($1)
}
double(1024)
3.7.5 fac
func fac() {
if ($1 <= 0) return 1 else return $1 * fac($1-1)
}
3.7.6 fac1
func fac() if ($1 <= 0) return 1 else return $1 * fac($1-1)
fac(0)
fac(7)
fac(10)
3.7.7 fac2
func fac() {
if ($1 <= 0) {
return 1
}
return $1 * fac($1-1)
}
i=0
while(i<=20){
print "factorial of ", i, "is ", fac(i), "n"
i=i+1
}
3.7.8 fib
proc fib() {
a = 0
b = 1
while (b < $1) {
print b
c = b
b = a+b
a = c
}
print "n"
}
3.7.9 fib2
{
n=0
a=0
b=1
while(b<10000000){
n=n+1
c=b
b=a+b
a=c
print(b)
}
print(n)
}
3.7.10 fibsum
proc fib(){
a=1
b=1
c=2
d=3
sum = a+b+c+d
while(d<$1){
e=d+c
print(e)
a=b
b=c
c=d
d=e
sum=sum+e
}
print(sum)
}
fib(1000)
3.7.11 fibtest
proc fib() {
a = 0
b = 1
while (b < $1) {
c = b
b = a+b
a = c
}
}
i = 1
while (i < 1000) {
fib(1000)
i = i + 1
}
3.7.12 hoc.h
typedef struct Symbol { /* symbol table entry */
char *name;
short type;
union {
double val; /* VAR */
double (*ptr)(); /* BLTIN */
int (*defn)(); /* FUNCTION, PROCEDURE */
char *str; /* STRING */
} u;
struct Symbol *next; /* to link to another */
} Symbol;
Symbol *install(), *lookup();
typedef union Datum { /* interpreter stack type */
double val;
Symbol *sym;
} Datum;
extern Datum pop();
extern eval(), add(), sub(), mul(), div(), negate(), power();
typedef int (*Inst)();
#define STOP (Inst)0
extern Inst *progp, *progbase, prog[], *code();
extern assign(), bltin(), varpush(), constpush(), print(), varread();
extern prexpr(), prstr();
extern gt(), lt(), eq(), ge(), le(), ne(), and(), or(), not();
extern ifcode(), whilecode(), call(), arg(), argassign();
extern funcret(), procret();
3.7.13 hoc.ms
.EQ
delim @@
.EN
.TL
Hoc - An Interactive Language For Floating Point Arithmetic
На этой странице вы можете бесплатно читать книгу UNIX — универсальная среда программирования - Керниган Брайан Уилсон бесплатно.
Похожие на UNIX — универсальная среда программирования - Керниган Брайан Уилсон книги
- История вычислительной техники в лицах - Борис Малиновский - История
- Язык программирования Си. Издание 3-е, исправленное - Брайан Керниган - Программирование
- Настоящие программисты не используют Паскаль - Пост Эд - Сатира
- Операционная - Кёка Идзуми - Классическая проза
- Язык программирования C++. Пятое издание - Стенли Липпман - Программирование
