[kodermax]

это паскаль
логику могу

Проверка правильности указания корреспондентского счёта:

Алгоритм проверки корреспондентского счёта с помощью БИКа банка:
1. Для проверки контрольной суммы перед корреспондентским счётом добавляются "0" и два знака БИКа банка, начиная с пятого знака.
2. Вычисляется контрольная сумма со следующими весовыми коэффициентами: (7,1,3,7,1,3,7,1,3,7,1,3,7,1,3,7,1,3,7,1,3,7,1)
3. Вычисляется контрольное число как остаток от деления контрольной суммы на 10
4. Контрольное число сравнивается с нулём. В случае их равенства корреспондентский счёт считается правильным.

Проверка правильности указания расчётного счёта:

Алгоритм проверки расчётного счёта с помощью БИКа банка:
1. Для проверки контрольной суммы перед расчётным счётом добавляются три последние цифры БИКа банка.
2. Вычисляется контрольная сумма со следующими весовыми коэффициентами: (7,1,3,7,1,3,7,1,3,7,1,3,7,1,3,7,1,3,7,1,3,7,1)
3. Вычисляется контрольное число как остаток от деления контрольной суммы на 10
4. Контрольное число сравнивается с нулём. В случае их равенства расчётного счёт считается правильным.