1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

1
2
3
4
(defun sub (velho novo x )
(prog (lista))
(dolist (p ( x ) (if (equal velho  ( x))
( setq  novo ( lista)) ( setq x ( lista ))))

1
2
(defun reverse_r(X) (if(eq X nil) nil (append (reverse_r (cdr X)) (cons
(car X ) nil))))

1
 

1
2
3
4
5
6
7
8
9
(deftemplate marble
                (slot color)
                (slot x) 
       (slot y) 
       (slot inPlay))
 
(deftemplate player (slot playerColor) (slot notInPlay))
 
(deftemplate score (slot amount))
 ...

1
2
3
4
5
6
7
8
9
(deftemplate marble
                (slot color)
                (slot x) 
       (slot y) 
       (slot inPlay))
 
(deftemplate player (slot playerColor) (slot notInPlay))
 
(deftemplate score (slot amount))
 ...

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

1
(+ 2 3)

1
(+ (2 3))

1
T

1
T

1
2
3
4
5
6
7
8
9
 (funcall (lambda (toi three xexp xx pred)
           (funcall (lambda (x)
                      (map (quote (vector character)) (lambda (i) (funcall (lambda (x) (code-char (+ 48 x))) (ldb (byte (funcall toi (lambda (f) (lambda (x) (funcall f (funcall f (funcall f x)))))) i) x)))
                           (funcall (lambda (x)
                                      (declare (special x))
                                      (funcall (lambda (tf) (funcall (lambda (f) (funcall tf f)) (lambda (f) (funcall tf f))))
                                               (lambda (f)
                                                 (cons (funcall toi x)
                                                       (unless (funcall (funcall x (lambda (x) nil)) t)
 ...

1
2
3
4
5
6
7
(defun fact (n)
       (labels ((rec (n acc)
           (if (< n 2)
           acc
           (rec (1- n ) (* acc n)))))
         (rec n 1)))
(fact 7251)

1
2
3
4
5
6
(defun fact (n)
       (labels ((rec (n acc)
           (if (< n 2)
           acc
           (rec (1- n ) (* acc n)))))
         (rec n 1)))

1
2
3
4
5
6
7
8
9
#include<iostream>
using namespace std;
class A{
public:
A()
{
cout<<"A ctor"<<endl;}
A(const A&a)
{cout<<"A copy ctor"<<endl;}
 ...

1
2
3
4
5
6
7
8
9
#include<iostream>
using namespace std;
class A{
public:
A()
{
cout<<"A ctor"<<endl;}
A[const A&a)
{cout<<"A copy ctor"<<endl;}
 ...

1
2
3
4
5
6
7
8
9
#include<iostream>
class A{
public:
A()
{
cout<<"A ctor"<<endl;}
A[const A&a)
{cout<<"A copy ctor"<<endl;}
~A()
 ...

1
? "hola"

1
2
3
4
5
6
#include<iostream>
class A{
public:
A()
{
cout<<"A ctor"<<endl;}

1
2
3
4
5
6
7
8
9
class Password
{
      static void Main(string[] args)
      {
             console.Write("The password is: ")
             
             for (int i = 0; i < 6; i++)
                 Console.Write(GetChar(i,i*i));
             Console.ReadKey();
 ...

1
2
3
4
5
6
7
8
9
class Password
{
      static void Main(string[] args)
      {
             console.Write("The password is: ")
             
             for (int i = 0; i < 6; i++)
                 Console.Write(GetChar(i,i*i));
             Console.readKay();
 ...

1
2
3
4
5
6
7
8
9
//Informatik_Serie11_Skript-Aufgabe139
//Program: norm.cpp
//
//Autor: Isabella Lamperti
 
#include <iostream> 
 
 
//nuovo tipo rational
 ...

1
2
3
4
5
6
7
8
9
//Informatik_Serie11_Skript-Aufgabe139
//Program: norm.cpp
//
//Autor: Isabella Lamperti
 
#include <iostream> 
 
 
//nuovo tipo rational
 ...

1
2
3
4
5
6
7
8
9
//Informatik_Serie11_Skript-Aufgabe139
//Program: norm.cpp
//
//Autor: Isabella Lamperti
 
#include <iostream> 
 
 
//nuovo tipo rational
 ...

1
2
3
4
5
6
7
8
9
//Informatik_Serie11_Skript-Aufgabe139
//Program: norm.cpp
//
//Autor: Isabella Lamperti
 
#include <iostream> 
 
 
//nuovo tipo rational
 ...

1
2
3
4
5
6
7
8
9
//Informatik_Serie11_Skript-Aufgabe139
//Program: norm.cpp
//
//Autor: Isabella Lamperti
 
#include <iostream> 
 
 
//nuovo tipo rational
 ...

1
(foo 'foo')

1
(foo 'foo')