1
2
3
4
5
6
7
8
9
 
#include<stdio.h>
#include<stdlib.h>
int a[1000000000]={0};
int main()
{
    
    int i,j,k;
    for(i=2;(i*i)<=1000000000;i++)
 ...

1
2
3
4
5
6
7
8
9
 
#include<stdio.h>
#include<stdlib.h>
int a[1000000000]={0};
int main()
{
    
    int i,j,k;
    for(i=2;(i*i)<=1000000000;i++)
 ...

1
2
3
4
5
6
7
(defvar lst1 '(1 2))
 
(defvar lst2 '(1 2 1 3 6 2 4))
 
;; (remove lst1 lst2 :test (lambda(a b) (member b a)))
 
(print (set-difference lst2 lst1))

1
(+ 2 4)

1
 

1
2
3
4
5
6
7
8
9
(deftemplate alumno
        (slot codigo)
        (slot nombre)
        (slot ccpp)
        (slot sexo)
)
(deffacts llenar-alumno
        (alumno (codigo 081567) (nombre alexander) (ccpp info) (sexo V))
)
 ...

1
2
3
4
5
6
7
8
9
(deftemplate alumno
        (slot codigo)
        (slot nombre)
        (slot ccpp)
        (slot sexo)
)
(deffacts llenar-alumno
        (alumno( (codigo 081567) (nombre alexander) (ccpp info) (sexo V)))
)
 ...

1
2
3
4
5
6
7
8
9
(defrule readin
        ?f<-(initial-fact)
=>
        (retract ?f)
        (assert (number (read)))
)
 
(defrule writeout
        ?f<-(number ?n)(test (<> ?n 42))
 ...

1
2
3
4
5
6
7
8
9
(defrule readin
        ?f<-(initial-fact)
=>
        (retract ?f)
        (assert (number (read)))
)
 
(defrule writeout
        ?f<-(number ?n)(test (<> ?n 42))
 ...

1
2
3
4
5
6
7
8
9
(defrule readin
        ?f<-(initial-fact)
=>
        (retract ?f)
        (assert (number (read)))
)
 
(defrule writeout
        ?f<-(number ?n)(test (<> ?n 42))
 ...

1
(+ 6 7 8)

1
'(h)

1
2
3
4
5
6
7
class DisplayText
{
        public static void main(String[] args)
        {
                System.out.println("My 1st Java Program");
        }
}

1
2
3
4
5
6
7
class DisplayText
{
        public static void main(String[] args)
        {
                System.out.print1n("My 1st Java Program");
        }
}

1
2
3
4
5
6
7
class DisplayText
{
        public static void main(Sting[] args)
        {
                System.out.print1n("My 1st Java Program");
        }
}

1
2
3
4
5
6
7
8
9
a=[[[3,1],[5,1],[821,1],[273997,1],[7741805910970258163,1]],[[2,2],[107,1],[244219007447,1],[95966808334871,1]],[[2,2],[7,3],[919,1],[56951,1],[103160249,1],[4656410419,1]],[[2,3],[17,1],[177693403,1],[414883089729841223,1]],[[3,1],[31,1],[4951,1],[1346989159,1],[50461897989311,1]],[[7,2],[79,1],[241,1],[4271,1],[48523,1],[1051181,1],[176838479,1]],[[2,1],[1475709031,1],[12177009148932085937,1]],[[6323573,1],[4753519027288416018457,1]],[[2,1],[18164960872674393974925145111,1]]]                               
a.length.times do |i|                                   
n=1                                     
(a[i].length).times do |j|                              
n*=a[i][j][0]**a[i][j][1]                                
end                              
s="";                                                   
(Math.log(n)/Math.log(256)).ceil.times do                               
s=(n%256).chr+s              
 ...

1
2
3
4
5
(defun
nome
(a b)
(if (< a b) (cont (nome((+ a 1) b ))) (cont) )
)

1
2
3
4
5
(defun
nome
(a b)
(if (< a b) (cont (nome((+ a 1) b ))) (cont) )
)

1
2
3
4
5
6
7
(defun
nome
(a b)
(if (< a b) (cont nome((+ a 1) b )) (cont) )
)
 
(nome 1 10)

1
()

1
(a)

1
2
3
4
5
6
7
8
9
(defrule readin
        ?f<-(initial-fact)
=>
        (retract ?f)
        (assert (number (read)))
)
 
(defrule writeout
        ?f<-(number ?n)(test (<> ?n 42))
 ...

1
2
3
4
5
6
7
8
9
include <stdio.h>
void main ()
{  int n, *i, a[7];
   printf ("vvedite n");
   scanf  ("%d", &n);
   printf ("vvedite elementi massiva");
   for (i=a; i<a+n; i++)
      scanf("%d",i);
   for (i=a; i<a+n; i++)
 ...

1
2
3
4
5
6
7
8
9
include <stdio.h>
void main ()
{  int n, *i, a[7];
   printf ("vvedite n");
   scanf  ("%d", &n);
   printf ("vvedite elementi massiva");
   for (i=a; i<a+n; i++)
      scanf("%d",i);
   for (i=a; i<a+n; i++)
 ...

1
(print 'privet')

1
 

1
b;main(a){scanf("%d",&a);printf("%d ",a);a>=b&&main(b,a-b);}

1
2
3
4
5
6
7
8
9
int lim = 0x12345678; int pp = 256;
for (int i = 1; (lim-pp) / ((64 + i) + pp) != 0; i++) {
    if (atan(i - ((i / lim) * lim)) > 1.55) // > ~50
        lim = (lim / 50) * 40;
    int foo = lim; // bar
    for (int j = 0; j < 0x123456; j++)
        foo ^= (j >> 3) | (j << 29); // tidy
    pp &= foo; // in 42-0
    if (lim - ((lim / i) * i) == 0) {
 ...

1
2
3
4
5
6
7
8
9
#include <iostream>
int main()
{
using namespace std;
cout<<"hi";
return 0;
 
 
}

1
2
3
4
5
6
7
8
9
Er ist’s 
        
                   
        
        Frühling läßt sein blaues Band       
        
        wieder flattern durch die Lüfte;               
        
        süße, wohlbekannte Düfte     
 ...