Вычисление идеальных антропометрических характеристик тела женщины

Пропорционально сложенная женщина имеет идеальную массу тела

М = (L*3 - 450 + В)*0,225 + 40,5 кг, где L - рост, см; В - возраст.

В теле такой женщины содержится около 22% жира. Фактическое содержание жира в процентах определяется по формуле

x=((m-M)*100)/m + 22.

(m - фактическая масса тела, кг), в килограммах - по формуле

mж=mx/100.

Содержание воды в килограммах определяется по формуле

mb = 0,732 * M,

средняя плотность тела в граммах на кубический сантиметр - по формуле

p = (0,89 * x + 1,1*(100-x))/100,

объем тела в кубических метрах - по формуле

v = m/(p * 1000),

площадь кожных покровов тела в квадратных метрах - по формуле Бойде

S = ((1000 * m)^y * L^0,3)/3118,2

где y = (35,75 - lg m) / 53,2.

Программа вычисляет указанные выше характеристики тела женщины.

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

L → П7, m → П8, В → П9.

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

mж → П4, M → П5, mb → П6, Х → П1, V → П2, S → П3, p → П0.

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

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

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

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

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

Исходные данные: L = 164 см, m = 67 кг, B = 43 лет.

Результаты (из РЭ БРП-4, округлённо): М = 60 кг. mx = 22 кг, mb = 44 кг, Х = 33%, p = 1,03 г/см³, V = 65 дм³, S = 1,77 м².

Результаты (ЭКВМ в режиме индикации 8 значащих цифр): М = 59,625 кг. mx = 22,115 кг, mb = 43,6455 кг, Х = 33,007463%, p = 1,0306843 г/см³, V = 65,005354 дм³, S = 1,7700337 м².

Программа "Вычисление идеальных антропометрических характеристик тела женщины"

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

Файл brp4-8.mkp (КС 3277/15)

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

Файл brp4-8.mkl

.CHARSET 1251

; БРП-4
;  8. Вычисление идеальных антропометрических характеристик тела женщины
; (1 - 1106498)

.ORG 0
	CX
	122
	RM 7
	3 * 450 -
	RM 9 +
	0,225 * 40,5 +
	M 5
	RM 8 /
	2 F 10^X
	M 0
	*
	-
	M 1
	RM 8 *
	RM 0 /
	M 4
	RM 5
	0,732 *
	M 6
	RM 8
	110
	RM 1
	0,21 *
	-
	RM 0 /
	M 0 /
	M 2
	35,75
	RM 8
	F LG
	-
	53,2 /
	RM 8 EE	3
	F X^Y
	M 3
	0,3
	RM 7
	F X^Y
	RM 3 *
	3118,2 /
	M 3
	RM 5
	R/S
	0
.END 

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