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

Для организации научно обоснованного (рационального) питания детей необходимо знать суточную потребность ребенка в основных питательных веществах (белках, жирах и углеводах) и общую калорийность рациона. Программа вычисляет потребность (количество граммов в день) в белках (Б), жирах (Ж), углеводах (У), и общую калорийность Q суточного рациона детей в возрасте (В) от 1 года до 13 лет. Исходное данное В (1 ≤ В ≤ 13) набирается на клавиатуре.

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

Q → П0, Б → П7, Ж → П4, У → П1.

Для контроля величина В автоматически заносится в ячейку П8.

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

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

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

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

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

Возраст (B), лет Время счёта (t) для МК-52, сек Белки (Б), г Жиры (Ж), г Углеводы (У), г Общая калорийность (Q), ккал
1   43 43 132 1054
2 15 53 53 192 1409
3   58 58 212 1549
4 17 63 63 232 1689
5   68 68 242 1791,5
6 12 72 72 252 1881
7   74 74 270 1974,5
8 12 76 76 288 2068
9   78 78 306 2161,5
10 10 80 80 324 2255
11   85 85 343 2391,25
12   90 90 362 2527,5
13 10 95 95 381 2663,75

Программа "Расчёт рационального питания детей"

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

Файл brp4-2.mkp (КС 3708/232)

  0 1 2 3 4 5 6 7 8 9
00 П 8 1 0 - F x≥0 35 П 6 1 9 ×
10 3 2 4 + П 1 ИП 6 5 × 8 0
20 + П 7 П 4 1 3 × ИП 1 3 , 7
30 5 × + П 0 С/П 4 + F x≥0 55 П 6
40 1 8 × 2 5 2 + П 1 ИП 6 2
50 × 7 2 БП 20 4 + П 6 F x≥0 85
60 2 0 × 1 9 2 + П 1 ИП 6 2
70 - F x≥0 78 1 0 × - П 1 ИП 6 5
80 × 5 3 БП 20 6 0 × 1 9
90 2 + П 1 ИП 6 2 × БП 79    

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

Файл brp4-2.mkl

.CHARSET 1251
; БРП-4

;  2. Расчёт рационального питания детей 
; (1 - 1018298) 

.ORG 0
	M 8
	10 -
	F X>=0 A35
	M 6
	19 * 324 +
	M 1
	RM 6
	5 *
	80

A20:	 ; с адреса 53, 83
	+
	M 7
	M 4
	13 *
	RM 1
	3,75 * +
	M 0
	R/S

A35:	 ; с адреса 4
	4 +
	F X>=0 A55
	M 6
	18 * 252 +
	M 1
	RM 6
	2 * 
	72
	GOTO A20

A55:	 ; с адреса 37
	4 +
	M 6
	F X>=0 A85
	20 * 192 +
	M 1
	RM 6
	2 -
	F X>=0 A78
	10 * -
	M 1

A78:	 ; с адреса 71
	RM 6

A79:	 ; с адреса 96
	5 *
	53
	GOTO A20

A85:	 ; с адреса 58
	60 * 192 +
	M 1
	RM 6
	2 *
	GOTO A79
.END

НПП "СЕМИКО" (383) 271-01-25 (многоканальный)