Вычисление индекса массы и артериального давления человека
Главная / ЭКВМ / Программы для ЭКВМ / БРП-4

Люди, заботящиеся о своем здоровье, стараются поддерживать нормальную массу тела. Медицинскими исследованиями установлено, что существует закономерная связь между изменением массы тела и факторами риска, т.е. теми факторами, которые могут привести к сердечно-сосудистым заболеваниям. Проводя анализ, исследователи учитывали не саму массу тела, а усредненный индекс массы ИМ = m/L2 (m - масса тела, кг; L - рост человека, м). Например, для человека массой 70 кг и ростом 1,7 м ИМ = 24. Если масса тела находится в пределах нормы, то индекс колеблется от 22 до 24. При ИМ > 24 существует почти линейная зависимость между артериальным давлением крови и индексом массы: чем больше ИМ, тем больше артериальное давление и тем больше содержание холестерина в крови.

Для заданных значений m и L программа вычисляет значение индекса массы и значения верхнего и нижнего артериального давления крови (pв и pн, мм рт. ст.).

Исходные данные заносятся в ячейки памяти:

m → П7, L → П8.

Результаты вычислений записываются в ячейки памяти:

ИМ → П4, pв → П9, pн → П6 и отображаются на дисплее слитно в виде шестизначного числа (первые три цифры - pв, последние три цифры - pн).

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

  • 1. Наберите адрес 1126035 и введите программу, нажав клавиши А↑, ↑↓.
  • 2. Введите исходные данные.
  • 3. Включите счет, нажав клавиши В/0, С/П. Время вычисления около 8 с.
  • 4. Считайте результаты.
  • 5. Для повторного запуска программы повторите пп. 2-4.

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

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

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

Исходные данные: m = 84 кг, L = 1,77 м.

Результаты: pв = 130 мм рт. ст., pн = 85 мм рт. ст.

ИМ = 26,812219

Программа "Вычисление индекса массы и артериального давления человека"

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

Файл brp4-9.mkp (КС 17623/189)

  0 1 2 3 4 5 6 7 8 9
00 ИП 7 ИП 8 F x2 ÷ П 4 2 4 - 2 ×
10 K [x] 8 0 ↔ + П 6 F Bx 1 2 5
20 + П 9 ИП 9 ВП 3 ИП 6 + С/П БП 00
30 0 0 0 0 0          

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

Файл brp4-9.mkl

.CHARSET 1251

; БРП-4
; 9. Вычисление индекса массы и артериального давления человека 
; (1 - 1126035)
.ORG 900

.ORG 0

A0:	 ; с адреса 28
	RM 7
	RM 8
	F X^2
	/
	M 4
	24 - 2 *
	K INT
	80
	<->
	+
	M 6
	F ANS
	125 +
	M 9
	RM 9 EE 3
	RM 6
	+
	R/S
	GOTO A0
	00000
.END

Примечание. Считывание программ из БРП в МК-52 производилось блоками по 7 байт. Неиспользуемые команды в конце программы оставлены для совместимости и используются при подсчёте контрольной суммы.
НПП "СЕМИКО" (383) 271-01-25 (многоканальный)