Essays.club - Получите бесплатные рефераты, курсовые работы и научные статьи
Поиск

Структура цикл

Автор:   •  Декабрь 24, 2021  •  Лабораторная работа  •  408 Слов (2 Страниц)  •  235 Просмотры

Страница 1 из 2

ЗАДАНИЯ К ЛАБОРАТОРНОЙ РАБОТЕ № 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

...

Скачать:   txt (2.7 Kb)   pdf (158.9 Kb)   docx (63.4 Kb)  
Продолжить читать еще 1 страницу »
Доступно только на Essays.club