Интернет магазин китайских планшетных компьютеров

Компьютеры - BCPL - Пример

Печать факториала:

GET "libhdr"

LET start = VALOF
{ FOR i = 1 TO 5 DO writef = %i4*n", i, fact)
  RESULTIS 0
}

AND fact = n=0 -> 1, n*fact