развилка. Отчет по лабораторной работе 3 структура развилка вариант 21 Выполнила студентка факультета фбфо
 Скачать 61.59 Kb.
|
 ФЕДЕРАЛЬНОЕ АГЕНТСТВО ЖЕЛЕЗНОДОРОЖНОГО ТРАНСПОРТА Федеральное государственное бюджетное образовательное учреждение высшего образования «ПЕТЕРБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ ПУТЕЙ СООБЩЕНИЯ ИМПЕРАТОРА АЛЕКСАНДРА I» Кафедра «ИНФОРМАЦИОННЫЕ И ВЫЧИСЛИТЕЛЬНЫЕ СИСТЕМЫ» Дисциплина: «Информатика» Отчет по лабораторной работе № 3 СТРУКТУРА РАЗВИЛКА Вариант 21 Выполнила студентка факультета ФБФО группы УПП-123з № зачетной книжки 07-123-21-УППЗ Зарубина Е.Е. Санкт-Петербург 2021 1.Постановка задачи Вычислить значение функции z, заданной двумя выражениями для двух диапазонов значений аргумента c Входные данные: c– аргумент функции, переменная вещественного типа Выходные данные: z– значение функции,переменная вещественного типа. 2.Математическая модель задачи  где c = 1,5 3.Разработка алгоритма  Начало  c  Да c>4,5  2^c-1 1+C^3 Нет   Z,C  Конец 4. Разработка визуальной части проекта В заголовке формы пишем «Структура РАЗВИЛКА» и на форме располагаем один элемент управления – командную кнопку с именем Command1 и надписью «Пуск». 5. Код приложения Private Sub Command 1_Click( ) Dim Z As Single, c As Single c=Inputbox(«Введите c», «Развилка») If c>4,5Then Z = 1+C^3 Else Z=2^C-1 EndIf Print «При c=» &c, «z=» &z End Sub          Структура РАЗВИЛКА x При с = -1,5 Z = -2.375 При c = 5 Z = 31 Пуск 5 Cancel Ок Развилка х Введите c -1,5 Cancel Ок Развилка х Введите c 6. Отладка приложения Контрольный пример: 1+(-1.5)^3=-2.375 2^5-1=31 |