Последовательная структура

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

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

высшего профессионального  образования

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

Кафедра «ИНФОРМАТИКА И ИНФОРМАЦИОННАЯ БЕЗОПАСТНОСТЬ»

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

 

 

 

 

ОТЧЕТ

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

«ПОСЛЕДОВАТЕЛЬНАЯ структура»

Вариант 6

 

 

 

Выполнила  студентка  Дорфман А.И.

Факультета ЭСУ 

Группы МЧБ-310

Зачетная книжка № 0731006

 

Вариант 6

1.

 

2. Вычислить объем правильной  треугольной пирамиды если известен  двугранный угол при боковом  ребре L и радиус R круга, описанного около одной из боковых граней:

если R = 6 см; L = 30⁰.

 

1.

	Fi= To=0E0
	m=EXP(x-1) y=sqr(x-1) f=(sin)^EXP(cos x)

 

 

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

Найти объем правильной треугольной пирамиды если известен двугранный угол.

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

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

L- Вещественное, угол

R- Вещественное, радиус круга

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

V-вещественное ,объем правильной треугольной пирамиды который нужно найти.

3)Математическое описание программы 

4)Схема алгоритма решения задачи:

Начало

 

L, R

КОНЕЦ

V

 

5) Листинг кода программы

Private Sub Command1_Click()

Const g As Single = 9.80665

Dim L As Integer

Dim R As Single

L= Val(Text1.Text)

R= Val(Text2.Text)

V=

Text3.Text = Str(S)

End Sub

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

2013