2
.docxФЕДЕРАЛЬНОЕ АГЕНТСТВО ЖЕЛЕЗНОДОРОЖНОГО ТРАНСПОРТА
Федеральное государственное бюджетное образовательное учреждение высшего образования
«ПЕТЕРБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ ПУТЕЙ СООБЩЕНИЯ Императора Александра 1»
Кафедра «ИНФОРМАЦИОННЫЕ И ВЫЧИСЛИТЕЛЬНЫЕ СИСТЕМЫ»
Дисциплина «ИНФОРМАТИКА»
Отчёт
по лабораторной работе №2
«Структура следование»
ВАРИАНТ 6
Выполнил студент Факультет: Группа: |
|
Проверила старший преподаватель |
|
Санкт-Петербург 2022
1.
|
Q = 1/5 Y=10^5 q = 2.85 |
|
z = x^(y+t) m = a+(b/(c+d)) t = Sqr (x^2 – a^2) |
2.
1. Постановка задачи.
1.1 Словесное описание задачи.
Полная поверхность правильной четырехугольной пирамиды равна S, угол наклона боковой грани к плоскости основания равен L. Определить объем пирамиды по формуле:
если S = 0,54 м3; L = 0,8 рад.
1.2 Состав входных и выходных переменных.
Входные переменные:
S – переменная вещественного типа.
L – переменная вещественного типа.
Выходные переменные:
V – переменная вещественного типа.
2 . Математическая модель.
3. Схема алгоритма.
начало
3
4
2
1
V
S, L
конец
5
4. Визуальная часть проекта.
5. код программы.
Private Sub CommandButton1_Click()
Dim V As Single, S As Single, L As Single
S = Val(TextBox1)
L = Val(TextBox2)
V = ((S * (Sin(L))) / (24 * (Cos(L / 2) ^ 3))) * (Sqr(Abs(2 * S * (Cos(L)))))
TextBox3 = Str(V)
End Sub
6. Откладка программы