Министерство образования Республики Беларусь
Учреждение образования
«Могилевский государственный университет продовольствия»
Кафедра АТПП
Работа с VBA
Отчет по задачам
Специальность 1-36 20 01 Низкотемпературная техника
по дисциплине «Информатика»
Проверил Ст.преподаватель Н.П.Овсянникова «____» ____________2020 г |
Выполнил Студент группы НТ-201 А.А.Алиев «____» ____________2020 г |
Могилев 2020
Оглавление
Задание 2 3
Вариант 1 3
Задание 2Вариант 1Составьте блок-схему и программу на языке VBA для вычисления площади прямоугольника. Исходные данные: Длинна (см): 9, Ширина (см): 7,5 Результат: Площадь прямоугольника: 67,5 (кв. см)
|
||||||||
Sub S() Dim a As Single, b As Single, S As Single a = InputBox("Введите длинну") b = InputBox("Введите ширину") S = a * b MsgBox (S & "см.кв.")
End Sub |
|
|
|
|
|
|
|
|