Исчисление подоходного налога с заработков участников Великой Отечественной войны, работающих по совместительству |
Главная / ЭКВМ / Программы для ЭКВМ / БРП-4 |
Эта программа входит в блок расширения памяти БРП-4 советского микрокалькулятора МК-52 и составлена на основе законодательства СССР. Программа исчисляет подоходный налог с заработков участников Великой Отечественной войны, работающих по совместительству или выполняющих разовые, случайные и временные работы не по месту основной работы. Исчисление налога производится с суммы заработка (СЗ) в соответствии с действующим законодательством. Сумма заработка 20 ≤ СЗ ≤ 300 для исчисления налога определяется в полных рублях (копейки отбрасываются). Исходное данное (СЗ в полных рублях) набирается на клавиатуре. Результаты вычислений записываются в ячейки памяти: 1. Подоходный налог (ПН5) в рублях и копейках (целая часть - рубли, дробная - копейки) записывается в ячейку П8 (ПН5 → П8) и отображается на дисплее. 2. Заработная плата (ЗП = С3 - ПН5) в рублях и копейках (целая часть - рубли, дробная - копейки) записывается в ячейку П9 (ЗП → П9). Для контроля сумма заработка автоматически заносится в ячейку П7 (СЗ → П7). Инструкция по пользованию программой для МК-52 с БРП-4
Инструкция по пользованию программой для ЭКВМ
Тестовые примеры
Программа "Исчисление подоходного налога с заработков участников Великой Отечественной войны, работающих по совместительству"Программа 19 из блока расширения памяти БРП-4, переключатель "1/2" блока в положении "1", адрес 1247884. Файл brp4-19.mkp (КС 7607/39)
Исходный текст для кросс-компилятораФайл brp4-19.mkl .CHARSET 1251 ; БРП-4 ; 19. Исчисление подоходного налога с заработков ; участников Великой Отечественной Войны, ; работающих по совместительству (1 - 1247884) .ORG 0 A0: ; с адреса 24 M 7 RM 7 10 M 9 A5: ; с адреса 50 / 3 - F X<0 A26 5,5 <-> A14: ; с адреса 35 3 * A16: ; с адреса 45, 55, 65 + RM 9 / M 8 - M 9 RM 8 R/S GOTO A0 A26: ; с адреса 8 1 - F X<0 A37 GSB A76 9 + RM 8 GOTO A14 A37: ; с адреса 28 1 - F X<0 A47 4 * 13 GOTO A16 A47: ; с адреса 39 2 - F X<0 A57 5 * 23 GOTO A16 A57: ; с адреса 49 3 - F X<0 A67 6 * A63: ; с адреса 74 41 GOTO A16 A67: ; с адреса 59 GSB A76 RM 8 7 * <-> - GOTO A63 A76: ; с адреса 30, 67 M 8 5 * K INT RM 9 / RTN 0 .END Примечание. Считывание программ из БРП в МК-52 производилось блоками по 7 байт. Неиспользуемые команды в конце программы оставлены для совместимости и используются при подсчёте контрольной суммы. |
||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
НПП "СЕМИКО" (383) 271-01-25 (многоканальный) |