Лингвофорум

Он умеет прописями переводить, но специально ковертирует в десятичную...

Упс...

Цитата: http://code.google.com/apis/language/translate/overview.htmlThe Google Translate API has been officially deprecated as of May 26, 2011. Due to the substantial economic burden caused by extensive abuse, the number of requests you may make per day will be limited and the API will be shut off completely on December 1, 2011.

Цитата: RawonaM от июня 19, 2011, 16:56
Это можно, но надо придумать алгоритм, что он будет считать «красивым».

Я ж уже приводил, и даже два варианта.
Конечно, на Javascript это будет не так компактно.
На всякий случай прокомментирую свой код:
      if_not length(truncate_char(s,ascii(s))) then goto nice; end; {все цифры одинаковы}
      if length(s)≥4 then
        if s=reverse(s) then goto nice; end; {симметрия}
        if left(s,half(length(s)))=right(s,succ(half(length(s)))) then goto nice; end; {совпадение первой и второй половины}
        if_not length(replace(s,left(s,2),'')) then goto nice; end; {цифры чередуются, типа 262626}
        if_not length(replace(s,left(s,3),'')) then goto nice; end; {аналогично, 120120120}
        if length(truncate_char(s,s[length(s)]))=1 then goto nice; end; {все цифры, кроме первой, совпадают}
        if length(truncate_char(reverse(s),ascii(s)))=1 then goto nice; end; {все цифры, кроме последней, совпадают}
      end;
      if length(s)≥3 then
        if length(truncate_char(s,%'0'))=1 then goto nice; end; {все цифры, кроме первой, — нули}
        {дальше — проверка, не идут ли цифры подряд, по возрастанию или убыванию}
        if abs(d:=ascii(s)-(s[col:=2]))>1 then goto next; end;
        repeat
          c:=s[col]; ++col;
          if c-s[col]<>d then goto next; end;
        until col≥length(s);
nice:
        p+=s+'[sub]'+str(i)+'[/sub] ';
      end;

goto 

Цитата: RawonaM от июня 19, 2011, 18:56
goto 

А мне нравится. Подобные конструкции с goto выглядят логично, естественно.
На C / Java я бы сделал функцию nice, и вместо goto nice писал бы return true, а вместо goto next — return false. Тоже хорошо, но функция...
А вообще, да, язык примитивный. Процедур и функций я наделал очень много, а развивать структуру языка — руки не дошли.
Компилятор транслирует это в байт-код, исполняемый редактором.

elfu moja mia sita hamsini na mbili 1652 суахили

,αχνγ' (1653)

elfu moja mia sita hamsini na nne 1654 суахили

๑๖๕๕ 1655

elfu moja mia sita hamsini na sita 1656 суахили

У мєни шоблон рвєтся...
Раньше считали осьминогов, чертей, ангелов, а теперь колво суахилей⁈

---

[on][/on]

Цитата: Bhudh от июня 20, 2011, 07:39
Раньше считали осьминогов, чертей, ангелов, а теперь колво суахилей⁈

нет, это ссылка на тему, где описано, как считать на суахили

vyoo elfu moja mia sita hamsini na vinane 1658 туалетов (суахили)

๑๖๕๙ 1659

333₂₃ (1659)
א׳תר״ס ‎(1660)

sixteen hundred and sixty one (1661)

432₂₀ (1662)
11411₆ (1663)

11412₆ (1664)

Совершенно случайно выпал радикс 6

mílle et sexcentí sexágintá quínque (1665)

23131₅ (1666)

un fil chwe chant trigain a saith (1667)

,αχξη' (1668)

sixteen hundred and sixty nine (1669)

765₁₅ (1670)