Перевод неметрических единиц объема сыпучих и жидких тел англоязычных стран в метрические единицы и наоборот

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

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

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

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

• 1. Наберите адрес 1375277 и введите программу, нажав клавиши А↑, ↑↓.
• 2. Введите исходное данное.
• 3. Включите счет, нажав для перевода в другие единицы объёма, выраженного:
  • - в литрах, клавиши В/0, С/П. Время вычисления около 21 с;
  • - в английских бушелях, клавиши БП, 1, 1, С/П. Время вычисления около 20 с;
  • - в английских галлонах, клавиши БП, 1, 4, С/П. Время вычисления около 20 с;
  • - в английских квартах, клавиши БП, 1, 7, С/П. Время вычисления около 19 с;
  • - в английских пинтах, клавиши БП, 2, 0, С/П. Время вычисления около 19 с;
  • - в американских жидкостных галлонах, клавиши БП, 3, 8, С/П. Время вычисления около 18 с;
  • - в американских жидкостных квартах, клавиши БП, 4, 1, С/П. Время вычисления около 18 с;
  • - в американских жидкостных пинтах, клавиши БП, 4, 4, С/П. Время вычисления около 17 с;
  • - в американских нефтяных баррелях, клавиши БП, 4, 9, С/П. Время вычисления около 17 с;
  • - в американских сухих галлонах, клавиши БП, 6, 0, С/П. Время вычисления около 15 с.
• 4. Для обратного перевода величин нажмите клавишу С/П. Время вычисления около 20 с;
• 5. Вызовите результаты вычисления с соответствующих ячеек памяти.

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

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

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

1. 100 л = 2,750 англ. бушеля = 22 англ. галлонам = 88 англ. квартам = 176 англ. пинтам = 26,42 амер. жидкостного галлона = 105,7 амер. жидкостной кварты = 211,4 амер. жидкостной пинты = 0,6605 амер. нефтяного барреля = 22,7 амер. сухого галлона.

2. 1 баррель нефти = 151,4 л = 34,37 амер. сухого галлона.

Программа "Перевод неметрических единиц объема сыпучих и жидких тел англоязычных стран в метрические единицы и наоборот"

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

Файл brp4-29.mkp (КС 7457/209)

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

Файл brp4-29.mkl

.CHARSET 1251

; БРП-4
; 29. Перевод неметрических единиц объёма сыпучих и жидких тел 
; англоязычных стран в метрические единицы и наоборот 
; (1 - 1375277)

.ORG 0

A0:	 ; с адреса 71
	M 0
	290,94 /
	M 1
	8 *
	M 2
	8 *
	M 3
	4 *
	M 4
	2 *
	M 5
	4,8429709 EE 3 +/-
	*
	M 6
	31 *
	M 7
	4 *
	M 8
	2 *
	M 9
	320 /
	M A
	34,373155 *
	M B
	4,4046 *
	M 0
	R/S
	RM 0
	GOTO A0
	0000
.END 

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