Структура следование / 7

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

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

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

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

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

ОТЧЁТ

ПО ЛАБОРАТОРНОЙ РАБОТЕ № 2

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

ВАРИАНТ 7

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

Факультет:

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

Группа:

Проверил:

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

20**

ЗАДАНИЯ К ЛАБОРАТОРНОЙ РАБОТЕ №2

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

ВАРИАНТ 7

	Delta=0.00005 V1=-1.5E2 m1=2^5
	m=x*sin(y)/2 y=2*sin(3.14+z)^2 x=g*Exp(1)*Exp(-b)

2.1 Словесное описание задачи:

Найти объем призмы.

2.2 Описание постановки задачи

Состав входных и выходных данных:

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

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

Fi (φ) – переменная вещественного типа,

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

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

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

2.3 Математическое описание задачи:

1

2.4 Схема алгоритма решения задачи: 2.5 Листинг кода программы:

Начало

Private Sub Command1_Click()

Dim S As Single, Fi As Single, Q As Single

2

S, φ, Q

S = Val (Text1.Text)

Fi = Val (Text2.Text)

3

Q = Val (Text3.Text)

V = Q / 2 * Sqr ( S * Sin ( 2 * Fi ) )

4

Text4.Text = Format ( V, “ 0.000 ” )

V

End Sub

5

Конец

2.6 Выполнение проекта: