Primitivizmus

Az alábbiakban bemutatjuk a programozási eszközöket, támogatott az LCRYP-ben:

 
/* Globális változók. */
int ga;
dupla gx;
char gc;

int OnTick()
{
  /* Helyi változók. * /
  int a, index;
  dupla x,és;
  char c;

  /* Hozzárendelés mint művelet. * /
  ga = a = 3;
  gx = x = y = 5;
  gc = c = '0';

  index = 0;
  prt(index,"a = [");
  /* Цикл while. */
  míg(a>= 0) {
    prt_a(index,a);
    a = a - 1;
  }
  prt_a(index,"]");

  index = 1;
  Print_AZ(index); // A funkció használata.

  index = 2;
  gc = 'A';
  prt(index,"");
  /* Цикл do-while. */
  csináld {
     prt_a(index,gc);
     gc = gc + 1;
  } míg(gc != „F”);

  /* Rekurzió bemutatása. */
  index = 2;
  prt(index,"");
  x = 3;
  y = 2;
  gx = factr(index,matek(x,és)); // Funkció argumentumok használata.
  prt_a(index," factr =");
  prt_a(index,gx);

  Visszatérés 0;
}

/* Az angol ábécé megjelenítése. */
int Print_AZ(int index)
{
  char ch;
  prt(index,"");  // Az index indexű sor kimenetének kezdete a diagramon.
  /* цикл for */
  mert (ch = 'A'; ch<= 'Z'; ch = ch + 1) {
    prt_a(index,ch); // A sor kimenetének folytatása az index mutatóval a diagramhoz.
  }
  Visszatérés 0;
}

/* Visszaadja az i szám faktoriálisát. */
int factr(int index, int)
{
  prt_a(index,én);
  ha(én<2) {
    Visszatérés 1;
  }
  más {
     visszatérés i * factr(index,i-1);
  }
}

int matek(int a, int b)
{
  adja vissza a + b;
}

/* A funkció nincs engedélyezve. */
int OnInit()
{
  Visszatérés;
}

/* A funkció nincs engedélyezve. */
int OnBar()
{
  Visszatérés;
}