Структура цикл
Автор: Den1lew • Декабрь 24, 2021 • Лабораторная работа • 408 Слов (2 Страниц) • 229 Просмотры
ЗАДАНИЯ К ЛАБОРАТОРНОЙ РАБОТЕ № 4
«СТРУКТУРА ЦИКЛ»
Вариант 21
Постановка задачи
1 Описание задачи
Поезд массой m, движущийся со скоростью V, остановился, пройдя после торможения путь S. Определить, как изменяется величина тормозной силы и время торможения в зависимости от скорости:
[pic 1],
где m = 2000 т; S = 550 м; 30 ≤ V ≤ 60 c шагом 5 км/ч.
2 Описание постановки задачи
Состав входных и выходных данных:
входные данные:
S – переменная целого типа,
M – переменная целого типа,
Выходные данные
F – переменная целого типа,
V – переменная целого типа
T – переменная целого типа,
3 Разработка математической модели
Поезд массой m, движущийся со скоростью V, остановился, пройдя после торможения путь S. Определить, как изменяется величина тормозной силы и время торможения в зависимости от скорости:
[pic 2],
где m = 2000 т; S = 550 м; 30 ≤ V ≤ 60 c шагом 5 км/ч.
4 Составление схемы алгоритма
[pic 3]
5 Программный код (Технология решения задачи в среде
программирования Visual Basic 6.0)
Dim F As Double
Dim T As Double
Dim S As Double
Dim V As Double
Dim M As Double
Dim Z As Double
Private Sub Command1_Click()
S = Val(Text9.Text)
M = Val(Text10.Text)
Do
F = (V ^ 2) * M / 2 * S
T = 2 * S / V
If Z = 1 Then
Text1 = F: Text5 = T: Text17 = V
ElseIf Z = 2 Then
Text2 = F: Text6 = T: Text18 = V
ElseIf Z = 3 Then
Text3 = F: Text7 = T: Text19 = V
ElseIf Z = 4 Then
Text4 = F: Text8 = T: Text20 = V
ElseIf Z = 5 Then
Text11 = F: Text14 = T: Text21 = V
ElseIf Z = 6 Then
Text12 = F: Text15 = T: Text22 = V
...