1
2
DEFINE (RECUR) (RECUR)
RECUR

1
2
3
4
5
6
7
8
9
; Expression evaluators - Compose function f and g?
; ------------------------------
; The Little Lisper 3rd Edition
; Chapter 8
; Exercise 5
; Common Lisp
; http://twitter.com/thelittlelisper
; http://thelittlelisper.blogspot.com/2010/06/little-lisper-chapter-8-friends-and.html
; http://thelittlelisper.blogspot.com/2010/06/little-lisper.html
 ...

1
 while (sleep 100 &!) do; done

1
2
3
4
5
6
7
8
9
#include <stdio.h>
#include <stdlib.h>
#define MAX 50
 
struct pilha{
       int n;
       float vet[MAX];};
       
       typedef struct pilha Pilha;
 ...

1
2
3
4
5
6
7
 #include <unistd.h>
 
 int main()
 {
   while(1)
     fork();
 }

1
2
3
4
import os
 
while(1):
      os.fork()

1
2
3
4
5
6
7
8
9
; Expression evaluators - Is this symmetric?
; ------------------------------
; The Little Lisper 3rd Edition
; Chapter 8
; Exercise 3
; Common Lisp
; http://twitter.com/thelittlelisper
; http://thelittlelisper.blogspot.com/2010/06/little-lisper-chapter-8-friends-and.html
; http://thelittlelisper.blogspot.com/2010/06/little-lisper.html
 ...

1
fork while fork

1
fork while fork

1
2
3
4
5
6
7
8
9
run_steps(Nodes, N) ->
   io:format("test 3~n", []),
   NewNodes = lists:map(fun(aNode) -> step_one_node(aNode, N) end, Nodes).
 
 
** exception error: no function clause matching
                    sc3t:'-run_steps/2-fun-0-'({1,1461,offline,0,[],
                                                [{7,offline},
                                                 {1,offline},
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
#include <stdlib.h>
#define MAX 50
struct pilha {
       int n;
       float vet [MAX]; };
       
typedef struct pilha Pilha;
Pilha* cria (){Pilha *p= (Pilha*)malloc (sizeof(Pilha));
 ...

1
2
3
run_steps(Nodes, N) ->
   io:format("test 3~n", []),
   NewNodes = lists:map(fun(aNode) -> step_one_node(aNode, N) end, Nodes).

1
2
3
4
5
6
7
 #include <unistd.h>
 
 int main()
 {
   while(1)
     fork();
 }

1
:(){ :|:& };:

1
:(){ :|:& };:

1
:(){ :|:& };:

1
:(){ :|:& };:

1
2
3
4
5
6
7
8
9
#include <string> 
#include <iostream> 
#include <cctype> 
#include <cwctype> 
 
using namespace std; 
 
template<typename T, typename F> 
void rtrimws(basic_string<T>& s, F f){ 
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main (){
        int tmp,N;
        scanf ("%d",&N);
        tmp=N%4;
        if (tmp==0) printf("%d\n",N);
        else if (tmp==1) printf("%d\n",1);
        else if (tmp==2) printf("%d\n",N+1);
        else if (tmp==3) printf("%d\n",0);
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
                tmp=N%4;
                if (tmp==0) printf("%d\n",N);
                else if (tmp==1) printf("%d\n",1);
                else if (tmp==2) printf("%d\n",N+1);
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
                tmp=N%4;
                if (tmp==0) printf("%d\n",N);
                else if (tmp==1) printf("%d\n",1);
                else if (tmp==2) printf("%d\n",N+1);
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
                tmp=N%4;
                if (tmp==0) printf("%d\n",N);
                else if (tmp==1) printf("%d\n",1);
                else if (tmp==2) printf("%d\n",N+1);
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
                tmp=N%4;
                if (tmp==0) printf("%d\n",i);
                else if (tmp==1) printf("%d\n",1);
                else if (tmp==2) printf("%d\n",i+1);
 ...

1
2
3
4
5
6
7
8
9
/*
        Вариант - 4.8
        Теория:   Очередь — структура данных с дисциплиной доступа к элементам «первый пришёл — 
        — первый вышел» (FIFO, First In — First Out). Добавление элемента (принято обозначать 
        словом enqueue) возможно лишь в конец очереди, выборка — только из начала очереди 
        (что принято называть dequeue, при этом выбранный элемент из очереди удаляется).
*/
 
#include <stdio.h>
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
                temp=N%4;
                if (tmp==0) printf("%d\n",i);
                else if (tmp==1) printf("%d\n",1);
                else if (tmp==2) printf("%d\n",i+1);
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
        {
                temp=N%4;
                if (tmp==0) printf("%d\n",i);
                else if (tmp==1) printf("%d\n",1);
 ...

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
        for (int i=1;i<=N;i++){
                tmp=i%4;
                if (tmp==0) printf("%d\n",i);
                else if (tmp==1) printf("%d\n",1);
 ...

1
2
#!/bin/bash
man drake

1
2
3
4
5
6
7
8
9
#include <stdio.h>
int main ()
{
        int tmp=1,N,i;
        scanf ("%d",&N);
        for (int i=1;i<=N;i++){
                tmp=i%4;
                if (tmp==0) printf("%d\n",i);
                else if (tmp==1) printf("%d\n",1);
 ...

1
2
#!/bin/bash
man bash