Лингвофорум

Цитата: Валентин Н от июня 10, 2013, 17:29

Цитата: Python от июня 10, 2013, 13:06
(6768)

«двушечку» пропустили

Похоже, с тех времен, как был написан скрипт, ее зачем-то убрали с сервера
Странно, что остальные цифры отображаются

А где там перевод в вавилоницу? Чот не вижу.

Цитата: Валентин Н от июня 10, 2013, 17:38

Цитата: Тайльнемер от мая 20, 2013, 12:24
ёёю = 6763

щито это

Это просто 33-чная позиционная система, где в качестве цифр — буквы русского алфавита.

Цитата: Валентин Н от июня 10, 2013, 18:39
А где там перевод в вавилоницу? Чот не вижу.

Автоперевод в вавилоницу я сам написал на scheme, у меня на диске лежит. Сайт — лишь источник картинок с вавилоницей.

6770

Цитата: Евгений от июня 11, 2013, 08:58
6770

6770+1=6771

፷፯፻፸፪ (6772)

Цитата: Тайльнемер от июня 10, 2013, 19:16

Цитата: Валентин Н от июня 10, 2013, 17:38

Цитата: Тайльнемер от мая 20, 2013, 12:24ёёю = 6763

щито это

Это просто 33-чная позиционная система, где в качестве цифр — буквы русского алфавита.

Вольфрам альфа на запрос выдаёт , значит должно быть ееэ, не?

Смотря что будет нулем, А, Я или вообще О

Цитата: Python от июня 11, 2013, 18:27
Смотря что будет нулем, А, Я или вообще О

А, ясно!

ЯФЛВ

Цитата: Python от июня 11, 2013, 19:05
ЯФЛВ

не расшифрованно

= 6774

Цитата: Валентин Н от июня 11, 2013, 19:17

Цитата: Python от июня 11, 2013, 19:05
ЯФЛВ

не расшифрованно

Схема расшифровки — под спойлером. Тот же принцип, что и в глаголичных цифрах, но с украинским алфавитом.

Цитата: Python от июня 11, 2013, 20:30
Схема расшифровки — под спойлером

Да видел, но надо и нормально тоже писать. Помнится мои посты без расшифровки игнорили тут.

ЯФЛҐ (6775)

6776

Цитата: Python от июня 13, 2013, 12:56
$c=1;$i=1;
for(qw/А Б В Г Ґ Д Е Є Ж З И І Ї Й К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Ь Ю Я/)
    {
    $map{"$i"}=$_;
    if(10*$c==($i+=$c))
        {
        $c=$i;
        }
    }
$n=$ARGV[0]//<>;
if($n=~/(\d)?(\d)?(\d)?(\d)$/)
   {
   for($1."000", $2."00", $3."0", $4)
      {
      print $map{$_}
      }
   }
print " ($n)";

а что с этим делать надо — куда вставлять

Скрипт на перле. Сохраняем в файле с расштрением .pl, запускаем с помощью perl.exe, вводим цифры, получаем буквы. Поскольку алфавит украинский, необходимо сохранить файл в виндоус-кодировке, а перед запуском скрипта в консоли сделать chcp 1251 (естественно, в консоли должен использоваться векторный шрифт (Lucida console, Consolas и пр.), не растровый).

Еще, в коде ошибка, мешающая работать с числами <1000. Нужно исправить
if($n=~/(\d)?(\d)?(\d)?(\d)$/)
на
if($n=~/(\d|^)(\d|^)(\d|^)(\d)$/)

Чо-то не работает у меня этот pl.

Во я чо нашёл http://numbers.prosto.ws/

6000+777=6777

Aлta tыhыыnca hette hyys hette юn aʃыs.

ЯФЛЄ (6778)
или ЯФЛЖ (6779)

int((1/2+1/6+1/89+1/9770)*10000) = 6780