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

лабор.работы 16 вариант / Laboratornaya_rabota_2_Variant_16

.docx
Скачиваний:
0
Добавлен:
14.05.2024
Размер:
59.86 Кб
Скачать

МИНИСТЕРСТВО ТРАНСПОРТА РОССИЙСКОЙ ФЕДЕРАЦИИ

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

Государственное бюджетное образовательное учреждение

высшего образования

«ПЕТЕРБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ

ПУТЕЙ СООБЩЕНИЯ ИМПЕРАТОРА АЛЕКСАНДРА I»

Кафедра «ИНФОРМАЦИОННЫЕ И ВЫЧИСЛИТЕЛЬНЫЕ СИСТЕМЫ»

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

О Т Ч Е Т

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

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

Вариант 16

Выполнил студент Осипчук Ю.В.

Факультета ФБФО

Группы В-315-з

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

2023

Задание 1.

Математические формулы, заданные в левом столбце, представить в

правом столбце в виде операторов присваивания на языке Visual Basic.

X =

Pi = 3,1416

X = (tan(cos(радианы(75) + sin(Pi/5)))) ^ 2/ _

(abs(a) + 0.7) ^ 0.2 + a ^ 2 + Sqr(abs(a + b))

x1 = – 0,019

x1 = -0.019

t = 490,5

t = 49 ^ 0.5

a = sin2 x

a = (sin(x)) ^ 2

s = ax + 2

s = a ^ (x + 2)

t = – ln

t = Sqr(x ^ 2 – a ^ 2) – log((a + b)/x)

Задание 2.

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

По неподвижной наклонной плоскости, образующей угол α с горизонтом, начинает соскальзывать без трения тело массой m1. На расстоянии L от начала движения в него попадает тело массой m2, летящее горизонтально. При этом тела останавливаются. Определить скорость второго тела до удара по формуле

V = , если m1 = 0,25 кг; L = 1,2 м; m2 = 0,3 кг;

 = /6; g = 9,81 м/с2.

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

m1 – масса тела, соскальзывающего по плоскости, переменная вещественного типа;

m2 – масса тела, летящего горизонтально;

L – расстоянии от начала движения.

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

V – скорость второго тела до удара.

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

V =

.

3. Разработка алгоритма

+

1

2

3

5

6

4

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

5. Код программы

Dim m1, m2, L As Single

Dim V As Single

Const alpha = 3.1416 / 6

Const g = 9.81

m1 = Val(TextBox1)

m2 = Val(TextBox2)

L = Val(TextBox6)

V = m1 * Sqr(2 * g * L * Sin(alpha)) / (m2 * Cos(alpha))

TextBox5 = Format(V, "0.0")

End Sub

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

Результаты ручного счета

При m1 = 0,25; m2 = 0,3; L = 1,2; V = 3,3.

Литература

1. Булавский П. Е. Структурный подход к программированию : учеб. пособие по дисциплинам «Информатика» и «Информатика в экономике». Часть 1. Запись текстов программ на алгоритмической языке Visual Basic / П. Е. Булавский, А. И. Дергачев, А. М. Перепеченов. – СПб. : ФГБОУ ВО ПГУПС, 2017.

2. Булавский П. Е. Сборник заданий и макеты форм отчетов по выполнению лабораторных работ : учеб.-метод. пособие по дисциплинам «Информатика» и «Информатика в экономике» для студентов заочной формы обучения / П. Е. Булавский, А. И. Дергачев, А. М. Перепеченов. – СПб. : ФГБОУ ВО ПГУПС, 2017.

3. Дергачев А. И. Сборник учебно-методических материалов и контрольных решений для проведения занятий со студентами университета всех специальностей по дисциплине «Информатика» / А. И. Дергачев, В. П. Андреев, Н. В. Байдина, Н. Ф. Костянко, А. М. Перепеченов. – URL : http://library.pgups.ru/elib/multim/2015/ inform_01.zip.