Реализации алгоритмов/Алгоритм Луна: различия между версиями

Содержимое удалено Содержимое добавлено
Строка 36:
Для i = 1 по ДлинаНомера Цикл
НомерЦифры = ДлинаНомера-i+1;
Цифра = Число(Сред(Текст),НомерЦифры,1));
Сумма = Сумма+?(НомерЦифры%2=1,Цифра,Цифра*2%9);
КонецЦикла;