Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
VBA_задания_2014.docx
Скачиваний:
38
Добавлен:
12.03.2016
Размер:
5.19 Mб
Скачать
  1. Самостоятельная работа

Необходимо написать макросы для заполнения 2-х столбцов таблицы:

ИМТ – индекс массы тела, отношение массы тела (в кг) к квадрату роста (в метрах)

Например, входящие данные таковы: вес = 85 кг, рост = 165 см. 

Следовательно, ИМТ = 85:(1,65×1,65) = 31,2.

Если индекс массы тела равен:

  • 20–25 – не стоит волноваться: у вас нормальный вес, который находится в гармонии с миром; 

  • 26–30 – вам стоит начать заботиться о своем организме; у вас имеется небольшой избыток веса. Дальнейшее накопление жира увеличивает риск развития различных болезней и ухудшения общего состояния здоровья;

  • 31–35 – вы имеете явную склонность к ожирению, поэтому необходимо приложить все усилия, чтобы снизить этот показатель;

  • 35 и более – у вас ожирение; пора бить тревогу и начинать активно работать над восстановлением былой формы.

Воспаление – это патологический процесс, возникающий в ответ на повреждение клеточных структур организма и проявляющийся в реакциях, направленных на устранение повреждения и приводящий к восстановлению в зоне повреждения.

Считаем, что воспаление соответствует температуре в следующих диапазонах:

Температура от 36,0 до 37,0 – нормальное состояние

от 37,1 до 38,0 – возникновение воспалительной реакции

от 38,1 до 39,9 – критическая температура

больше 40,0 – лихорадочное состояние

меньше 36,0 – упадок сил

Установить кнопки «ИМТ» и «Воспаление» и подсоединить к ним созданные макросы.

Итоговая таблица с рассчитанными показателями показана на рисунке 21.

Рис. 21. Итоговая таблица после выполнения практической работы

Пример листинга на языке VBA

Выделение J4, запись формулы вычисления ИМТ и копирование по диапазону J4:J13, округление до целого

Цикл по всему диапазону данных.

Сравнение значениий, выделение цветом ячейки и характеристика ИМТ.

1Информатика и ИКТ. Практикум по программированию.10-11 класс. Базовый уровень./Под ред. Проф. Н.В. Макаровой. – СПб.: Питер, 2007.

2VBAв приложении кExcel,WordиPowerPoint. Информатика.№ 1, 2006.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]