Добавил:
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
6
Добавлен:
17.11.2022
Размер:
272.15 Кб
Скачать

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

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

«Петербургский государственный университет путей сообщения

Императора Александра I»

(ФГБОУ ВО ПГУПС)

Кафедра «Информационные и вычислительные системы»

Дисциплина «Информатика»

ОТЧЕТ

о лабораторной работе № 1

на тему:

«С Т Р У К Т У Р А С Л Е Д О В А Н И Е»

Вариант 22

Выполнила

студентка факультета

группы

Проверил

_______________

_______________

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

20**

Задание №1

xr=-3,01

xr=-3.01

σ=0,4*10-12

Sigma=0.4*10^-12

f=143000000

f=143E6

c=0,267*10-3a

c=0.267*10^-3*a

l=0,3a3-b2

l=0.3*a^3-b^2

y=a*b*Cos(x)/(a+b)+1

Задание №2

1. Постановка задачи

1.1. Словесное описание задачи

Две боковые грани треугольной пирамиды – прямоугольные равнобедренные треугольники, гипотенузы которых равны C и образуют между собой угол L. Найти объём пирамиды по формуле:

если C=14 см; L=0,65рад.

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

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

С – переменная вещественного типа,

L – переменная вещественного типа.

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

V – переменная вещественного типа.

2. Математическая модель задачи

3. Схема алгоритма

4. Визуальная часть проекта

5. Код приложения

Private Sub Command1_Click()

C = Text1.Text

L = Text2.Text

V = 1 / 6 * C ^ 3 * Sin(L / 2) * Sqr(Cos(L))

Text3.Text = V

End Sub

6. Отладка программы

Соседние файлы в папке Структура следование