Перевод метрических единиц массы в неметрические старые русские единицы и наоборот

Программа переводит метрические единицы массы (килограмм) в неметрические старые русские единицы (пуд, фунт, лот, золотник, долю) и наоборот.

Исходное данное (значение массы) набирается на клавиатуре.

Результаты вычислений записываются в ячейку памяти: масса, выраженная в килограммах, - в ячейку П7, в пудах - в ячейку П8, в фунтах - в ячейку П0, в лотах - в ячейку ПА, в золотниках - в ячейку ПВ, в долях - в ячейку ПС.

Инструкция по пользованию программой для МК-52 с БРП-4

• 1. Наберите адрес 1350070 и введите программу, нажав клавиши А↑, ↑↓.
• 2. Введите исходное данное.
• 3. Включите счет, нажав для перевода в другие единицы массы, выраженной:
  • - в килограммах, клавиши В/0, С/П. Время вычисления около 10 с;
  • - в долях, клавиши БП, 3, 2, С/П. Время вычисления около 11 с;
  • - в золотниках, клавиши БП, 3, 9, С/П. Время вычисления около 12 с;
  • - в лотах, клавиши БП, 4, 2, С/П. Время вычисления около 13 с;
  • - в пудах, клавиши БП, 5, 5, С/П. Время вычисления около 9 с.

Инструкция по пользованию программой для ЭКВМ

• 1. Загрузите программу с нулевого адреса.
• 2. Введите исходное данное.
• 3. Включите счет, нажав для перевода в другие единицы массы, выраженной:
  • - в килограммах, клавиши В/0, С/П;
  • - в долях, клавиши БП, 3, 2, С/П;
  • - в золотниках, клавиши БП, 3, 9, С/П;
  • - в лотах, клавиши БП, 4, 2, С/П;
  • - в пудах, клавиши БП, 5, 5, С/П.

Тестовые примеры

1. 5 кг = 0,3052503 пуда = 12,21 фунта = 390,72 лота = 1172,1611 золотника = 112527,46 доли.

2. 3 золотника = 288 долям.

3. 1 пуд = 16,38 кг.

Программа "Перевод метрических единиц массы в неметрические старые русские единицы и наоборот"

Программа 27 из блока расширения памяти БРП-4, переключатель "1/2" блока в положении "1", адрес 1350070.

Файл brp4-27.mkp (КС 9005/71)

Исходный текст для кросс-компилятора

Файл brp4-27.mkl

.CHARSET 1251

; БРП-4
; 27. Перевод метрических единиц массы 
; в неметрические старые русские единицы и наоборот 
; (1 - 1350070)

.ORG 0

A0:	 ; с адреса 62
	M 7
	16,38 /
	M 8
	40 *
	M 0
	1280 *
	40 /
	M A
	3 *
	M B
	288 *
	3 /
	M C
	R/S
	M C
	3 *
	288 /
	M B
	3 /
	M A
	40 *
	1280 /
	M 0
	40 /
	M 8
	16,38 *
	GOTO A0
	000000
.END 

Примечание. Считывание программ из БРП в МК-52 производилось блоками по 7 байт. Неиспользуемые команды в конце программы оставлены для совместимости и используются при подсчёте контрольной суммы.