У вас вопросы?
У нас ответы:) SamZan.net

Вариант 7 Выполнила студентка Факультета ЭСУ

Работа добавлена на сайт samzan.net: 2015-07-05

Поможем написать учебную работу

Если у вас возникли сложности с курсовой, контрольной, дипломной, рефератом, отчетом по практике, научно-исследовательской и любой другой работой - мы готовы помочь.

Предоплата всего

от 25%

Подписываем

договор

Выберите тип работы:

Скидка 25% при заказе до 20.2.2025

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

Федеральное государственное бюджетное образовательное учреждение высшего профессионального образования
“ПЕТЕРБУРГСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ ПУТЕЙ СООБЩЕНИЯ”

Кафедра “ИНФОРМАТИКА И ИНФОРМАЦИОННАЯ БЕЗОПАСНОСТЬ”
Дисциплина: “Информатика”





ОТЧЕТ
по лабораторной работе №4:
“ЦИКЛ”
Вариант 7

Выполнила студентка                   
Факультета ЭСУ                                               
_________И. И. Гашкова
Группы ЭББ-305                                           подпись                          дата
       07-305-28
/номер зачетной книжки/

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

  1.  Постановка задачи №1
  2.  Словесное описание задачи

Поезд массой m , движущийся со скоростью V, остановился, пройдя после торможения путь S. Определить, как изменяется величина тормозной силы и время торможения в зависимости от скорости

                                                          ;

где m = 2000 т; S = 550 м; 30 ≤V ≤60 c шагом 5 км/ч.

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

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

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

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

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

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

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

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

  1.  Разработка математической модели

F=(V^2*m)/2*S ;     t = 2*S/V

  1.  

1

Составление схемы алгоритма

Начало

 

2

      V, Vn, Vk, dV

3

Vn

5

4

V<= Vk ,

   F=(V^2*m)/2*S

 Да

6

t = 2*S/V

7

F, t

 Нет

8

9

V = V +dV

Конец

  1.  Откладка программы

Private Sub Command1_Click()

Const Vn As Integer  = 30

Const Vk As Integer = 60

Dim m As Integer, S As Integer

Dim F As Single, t As Single, dV As Integer

m = InputBox("Введите значение m")

S = InputBox("Введите значение S")

dV = InputBox("Введите значение dV")

For V = Vn To Vk Step dV

F=(V^2*m)/2*S

t = 2*S/V

Print "F= " & Format(F, "0.000") & " t=" & Format(t, "0.000") & " S= " & Format(S, "0.000") & " m= " & Format(m, "0.000") & " Vn= " & Format(m, "0.000") & " Vk= " & Format(m, "0.000")

Next V

End Sub

  1.  Постановка задачи № 2
  2.  Словесное описание задачи

Вычислить значения функции по формуле:

где постоянная ; переменные: целого типа; - вещественного типа.

 

На печать выдать значения:

а) входных данных;

б) аргументов , изменяющегося в пределах с шагом , и ,             изменяющегося в пределах с шагом

в) функции с точностью до сотых для соответствующих и .

При решении контрольного примера принять:

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

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

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

b1 - переменная целого типа

bk - переменная целого типа

R1 переменная вещественного типа

Rk - переменная вещественного типа

  1.  Разработка математической модели

где

с шагом ,

с шагом ;

  1.  

1

Составление схемы алгоритма

Начало

2

        b1, bk, db, R1, Rk, dR

3

b=b1

5

b<=bk

4

R = R1

7

11

Конец

6

R<=Rk

V, b, R

10

8

9

b = b+db

R = R+dR

  1.  Откладка программы

Private Sub Command1_Click()

Const pi As Single = 3.14

Dim V As Single

Dim b1 As Integer, bk As Integer, db As Integer, b As Integer

Dim R1 As Single, Rk As Single, dR As Single, R As Single

b1 = InputBox("Введите значение b1")

bk = InputBox("Введите значение bk")

R1 = InputBox("Введите значение R1")

Rk = InputBox("Введите значение Rk")

db = 1

dR = 2.5

  For b = b1 To bk Step db

     R=R1

     Do

     V = 1/6*pi*b*(b^2+3*b^2)

     Print "V= " & Format(V, "0.000") & " b= " & Format(b, "0.000") & " R= " & Format(R, "0.000")  

     R=R+dR

     Loop While R<=10

  Next

End Sub




1. Тема- Из глубины веков Саратова
2. Государственное управление как объект административно-правового регулирования.html
3. пародия но могу сказать одно ' очень затягивает
4. Академічні вчені не створюють якоїсь нової літературної мови а беруть за основу українську народну насичу
5. Дзёмон - японский неоли
6. I Tht disese chrcterized by severe inflmmtion of mucous membrnes nd usully trnsmitted sexully hd spred beyond the genitls to the rest of the body
7. Экономика транспорта для студентов специальности ВАГОНЫ 1
8. а имеет следующие соматометрические показатели- длина тела~ 124 см масса тела ~ 246 кг окружность грудн
9. тема оценок результатов функционирования системы МТО.
10. КОНТРОЛЬНА РОБОТА з дисципліни- Фінансове право