Essays.club - Получите бесплатные рефераты, курсовые работы и научные статьи
Поиск

Структура ЦИКЛ

Автор:   •  Декабрь 19, 2021  •  Лабораторная работа  •  1,151 Слов (5 Страниц)  •  277 Просмотры

Страница 1 из 5

ФЕДЕРАЛЬНОЕ АГЕНТСТВО ЖЕЛЕЗНОДОРОЖНОГО ТРАНСПОРТА

Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования

«ПЕТЕРБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ ПУТЕЙ СООБЩЕНИЯ Императора Александра 1»

Кафедра «ИНФОРМАТИКА И ИНФОРМАЦИОННАЯ БЕЗОПАСНОСТЬ»

Дисциплина «ИНФОРМАТИКА»

Отчёт

по лабораторной работе №4

«Структура ЦИКЛ»

Вариант 15

Выполнил студент                                                                                            

Факультет:

Специальность:

Проверила                                                                                                            

Санкт-Петербург

 2020

Задание 1

  1. Постановка задачи
  1. Словесное описание задачи

[pic 1]

  1. Состав входных и выходных данных

Входные данные:

  • L0 – начальное значение параметра цикла, вещественная переменная;
  • Lk – конечное значение параметра цикла, вещественная переменная;
  • dL – шаг параметра цикла, вещественная переменная;
  • k1 – вещественная переменная;
  • k2 - вещественная переменная

Выходные данные:

  • N - вещественная переменная;
  • L - вещественная переменная
  1. Разработка математической модели

[pic 2]

[pic 3]

  1. Разработка схемы алгоритма

  [pic 4]

[pic 5]

   [pic 6]

[pic 7]

[pic 8]

  [pic 9]

[pic 10]

[pic 11]

                                Да                                                                   [pic 12][pic 13]

[pic 14]

        Нет[pic 15][pic 16]

[pic 17][pic 18]

[pic 19]

[pic 20]

  1. Разработка визуальной части

[pic 21]

  1. Разработка кода приложения

Private Sub Command1_Click()

Dim L0 As Single, Lk As Single, dL As Single, k1 As Single, k2 As Single, N As Single

Const pi As Single = 3.14

L0 = InputBox("Введите L0")

Lk = InputBox("Введите Lk")

dL = InputBox("Введите шаг L")

k1 = InputBox("Введите k1")

k2 = InputBox("Введите k2")

For L = L0 To Lk Step dL

N = 4 * ((k2 - k1) * Cos(L * pi / 180) - Sin(L * pi / 180)) / (Sin(L * pi / 180) + k1 * Cos(L * pi / 180))

Print "L=" & L; Tab; "N=" & N

Next

End Sub

  1. Отладочный пример

[pic 22]

Задание 2

  1. Постановка задачи
  1. Словесное описание задачи

[pic 23]

[pic 24]

  1. Состав входных и выходных данных

Входные данные:

  • h0 – начальное значение параметра цикла, вещественная переменная;
  • hk – конечное значение параметра цикла, вещественная переменная;
  • dh – шаг цикла, вещественная переменная;
  • r0 – начальное значение параметра цикла, вещественная переменная;
  • yr – конечное значение параметра цикла, вещественная переменная;
  • dr – шаг цикла, вещественная переменная.

Выходные данные:

  • r – вещественная переменная;
  • h – вещественная переменная;
  • V – вещественная переменная.
  1. Математическое описание

[pic 25]

[pic 26]

  1. Разработка схемы алгоритма

Внешний цикл с предусловием, внутренний с постусловием.

[pic 27]

[pic 28]

[pic 29]

[pic 30][pic 31]

...

Скачать:   txt (5.8 Kb)   pdf (535.2 Kb)   docx (421.4 Kb)  
Продолжить читать еще 4 страниц(ы) »
Доступно только на Essays.club