4.1 лаба инфа. Отчет по лабораторной работе 4 структура следование вариант 19 Выполнил студент Лаптев К. C

• Название: Отчет по лабораторной работе 4 структура следование вариант 19 Выполнил студент Лаптев К. C
• Дата: 07.12.2022
• Размер: 55.13 Kb.
• Имя файла: 4.1 лаба инфа.docx
• Тип: Отчет; #833451

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

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

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

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

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

ПУТЕЙ СООБЩЕНИЯ ИМПЕРАТОРА АЛЕКСАНДРА I»
Кафедра «ИНФОРМАЦИОННЫЕ И ВЫЧИСЛИТЕЛЬНЫЕ СИСТЕМЫ»

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

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

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

Вариант 19

Выполнил студент Лаптев К. C.

Факультет: Транспортное строительство

Группа: СЖУ-201


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

2022

Задание 1

	X=(abs(a)*abs(b)^0.3+(a^2+b^2)/(a^3+b^5+1.2))/Exp(-abs(a+b))*cos(pi/7)+1.2
	N=0.05E2 Pi=3.1415926
	T=(sin(a))^cos(b) Y=1/(x-1) Z=Exp(sin^3(x*a))

Задание 2

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

Грани параллелепипеда – ромбы, которые равны между собой и расположены так, что встречаются в одной из вершин три острых угла. Найти объем параллелепипеда по формуле. Если А=34.7 W=20 градусов (0.35 рад).

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

А - сторона параллелепипеда, переменная вещественного типа

W –угол параллелепипеда, переменная вещественного типа

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

V – объем параллелепипеда, переменная вещественного типа

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

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

A;W:V







V



Конец

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

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

Private Sub CommandButton1_Click()

Dim W As Single, A As Single

Dim V As Single

W = Val(TextBox1.Text)

A = Val(TextBox2.Text)

V = 2 * A ^ 3 * Sin(W / 2) * Sqr(Sin(1.5 * W) * Sin(W / 2))

TextBox3.Text = Str(V)

End Sub

6. 
   Отладка приложения
   

Ручной счет: при A=34.7 и при W =0.35 рад. V= 4297.919