Скачиваний:
2
Добавлен:
31.01.2024
Размер:
71.35 Кб
Скачать

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

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

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

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

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

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

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

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

О Т Ч Е Т

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

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

Вариант 11

Выполнил студент Пакетов И.И.

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

Группы СЖУ-07-337-11

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

2023

1.Операторы присваивания.

Const µ = 50,2

Const TH = 8*(10^(-4))

Y = ((Abs(X)+2,5)^(Abs(a+b+1,5)+Sin(e^(-(Abs(X)))+1,5))/(a*b+Abs(a-b)*((a^2+b^2+1)^(1,2)))

Q=Tan(b)/(c+Abs(x))^(1/3)

F= Cos(x)^2 + Sin(x)^2

Z= Log(a+b)*(e^(a+b)

2.Решение задачи на ЭВМ.

Вычислить поверхность и объем шарового пояса, если заданы радиус шара R, высота шарового пояса h и радиусы основания шарового пояса r1 и r2 по формулам

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

π ≈ 3,415

R – радиус шара

h – высота шарового пояса

r1 – радиус основания шарового пояса (первый)

r2 – радиус основания шарового пояса (второй)

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

Vобъем шарового пояса

Sплощадь поверхности шарового пояса

Разработка математической модели:

Математическая модель устанавливает связь между входными и выходными данными. В нашем случае связь между входными и выходными данными задаётся формулами:

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

Начало

Ввод: R, h, r1, r2

Вывод: S, V

Конец

Рис.1 Блок-схема алгоритма.

Код Visual Basic:

Private Sub CommandButton1_Click()

‘Программа расчета поверхности и объема шарового пояса

Dim H As Single

Dim V As Single

Dim S As Single

Dim R As Single

Dim r1 As Single

Dim r2 As Single

Const pi As Single = 3.1415

H = Val(TextBox1.Text)

R = Val(TextBox2.Text)

r1 = Val(TextBox3.Text)

r2 = Val(TextBox4.Text)

S = 2 * pi * R * H

V = ((1 / 6) * pi * H * H * H) + (1 / 2) * pi * (r1 * r1 + r2 * r2) * H

TextBox5.Text = S

TextBox6.Text = V

End Sub

Результат решения:

Рис.3 Результат решения

Литература

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

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

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

Соседние файлы в папке Лабораторные работы 1 курс 1 сессия [заочка]