Picat 0.1 (beta-1)

Версия реализации Picat языка программирования Picat

Версия Picat 0.1 (beta-1).

Ссылки:

Скачать Picat

Примеры:

Hello, World! - Picat (545):

main =>
     print("Hello, World!\n").

Hello, World! - Picat (546):

main =>
     println("Hello, World!").

Факториал - Picat (547):

Используется рекурсивное определение факториала, реализованное с помощью предиката.

factorial(0, F) => F = 1.
factorial(N, F), N > 0 => factorial(N - 1, F1), F = N * F1.

main =>
     foreach (I in 0 .. 16)
          factorial(I, F),
          writef("%w! = %w\n", I, F)
     end.

Факториал - Picat (548):

Используется рекурсивное определение факториала, реализованное с помощью функции.

factorial(0) = 1.
factorial(N) = F, N > 0 => F = N * factorial(N - 1).

main =>
     foreach (I in 0 .. 16)
          writef("%w! = %w\n", I, factorial(I))
     end.