Контрольное упражнение к лабораторной работе №2

Подсчитать площадь S прямоугольника со сторонами a, b, c по формуле Герона:

S=

где p=(a+b+c)/2, a=3, b=4, c=5.

Ввод данных осуществлять двумя способами:

1) На экран должны выводиться запросы вида ”Введите значение a”, ”Введите значение b”, ”Введите значение d”, “Площадь треугольника равна” <значение S>. Для этого использовать функцию VBA sqr:

S= sqr(p*(p-a)*(p-b)*(p-c))

2) Вводить данные в таблицу Excel

В этом способе данные вводятся в ячейки таблицы Excel непосредственно, без использования VBA. Для использования этих данных в качестве исходных в процедуре VBA можно ссылаться на ячейки с введёнными данными. Например, для присвоения значения переменной R значения ячейки A5 на текущем рабочем листе можно использовать инструкцию R=Cells(5,1) или инструкцию R=Range(“A5”) (Смотри п.4 – Адресация ячеек).