ARIBAS
- Дата создания:
- 1996
- Создан под влиянием:
- Парадигма:
- Принятые расширения файлов:
- .ari
- Реализации и версии (свернуть все | развернуть все):
ARIBAS — интерактивный язык вычислений, поддерживающий работу с большими целыми числами и с числами с плавающей запятой произвольной точности.
Синтаксис языка ARIBAS напоминает синтаксис языков Pascal и Modula.
В ARIBAS встроены функции для алгоритмов из теории чисел, такие как наибольший общий делитель, факторизация и др.
Ссылки:
Примеры:
Факториал:
Пример для версий ARIBAS 1.53Используется рекурсивное определение факториала функцией fac, т.к. имя factorial зарезервировано для встроенной функции вычисления факториала. В ARIBAS по умолчанию используется тип данных integer.
group(0) при выводе служит для отмены использования знака подчеркивания для разделения групп цифр.
function fac(n);
begin
if (n = 0) then
return(1);
end;
return(n * factorial(n - 1));
end;
function fac0_16();
var n;
begin
for n := 0 to 16 do
writeln(n, "! = ", fac(n): group(0));
end;
end;
fac0_16().
Факториал:
Пример для версий ARIBAS 1.53Используется встроенная функция factorial. В ARIBAS по умолчанию используется тип данных integer.
group(0) при выводе служит для отмены использования знака подчеркивания для разделения групп цифр.
function fac0_16();
var n;
begin
for n := 0 to 16 do
writeln(n, "! = ", factorial(n): group(0));
end;
end;
fac0_16().
Hello, World!:
Пример для версий ARIBAS 1.53writeln("Hello, World!");
Числа Фибоначчи:
Пример для версий ARIBAS 1.53Этот пример использует рекурсивное определение чисел Фибоначчи. В ARIBAS по умолчанию используется тип данных integer. group(0) при выводе служит для отмены использования знака подчеркивания для разделения групп цифр.
function fib(n);
begin
if (n < 3) then
return(1);
end;
return(fib(n-1)+fib(n-2));
end;
function fib1_16();
var n;
begin
for n := 1 to 16 do
write(fib(n): group(0), ", ");
end;
writeln("...");
end;
fib1_16().
Комментарии
]]>blog comments powered by Disqus
]]>