Студопедия.Орг Главная | Случайная страница | Контакты | Мы поможем в написании вашей работы!  
 

Индивидуальные задания. Разработать программу расчета скорости V, км/ч, движения локомотива в зависимости от частоты вращения n



Задание 1.

Разработать программу расчета скорости V, км/ч, движения локомотива в зависимости от частоты вращения n, 1/с, тяговых электродвигателей и передаточного коэффициента M тягового редуктора:

,

где D – диаметр колеса локомотива, D = 1,050 м.

Для грузовых тепловозов коэффициент М равен 4,41, для пасса-
жирских – 2,32.

Выполнить расчеты при n = 40, 50, 60 1/c.

Программа вычислений имеет вид:

Option Explicit

Sub VA ()

DIM D As Single, M As Single, N As Single, V As Single

D=Cells(5,2)

М= Val(InputBox("Передаточный коэффициент М"))

N= Val(InputBox("Частота вращения n (1/с)"))

V=11.28*D*N/M

MsgBox("Скорость движения V=" & V)

End Sub

При написании строк программы необходимо использовать отступы,это является основой создания понятного программного кода.

Ввод значения диаметра колеса локомотива D выполнить считыванием данных из ячейки В5 листа рабочей книги Excel (рис. 2.1) с помощью оператора Cells().

Оформление ввода значений представлено на рис. 2.1.

       
   
 
 
Рис. 2.1. Вид окна с рабочим листом Excel  


Задание 2.

Разработать ГСА и программу вычисления значения функции при заданных значениях аргументов и сравнить результат с ответом (табл. 2.1).

В программе необходимо:

1) ввод данных осуществить с помощью оператора присваивания, вывод значений выражений – с помощью функции MsgBox;

2) ввод исходных данных функции осуществить с помощью оператора InputBox, вывод результата расчета – на рабочий лист Excel;

3) ввод исходных данных осуществить с рабочего листа Excel, вывод результата расчета – на рабочий лист Excel с пояснениями.

Таблица 2.1

Варианты значений функции для вычисления

Номер варианта Функции Исходные данные Ответы
       
      z = 35,232; x = 16,786; l = 30,358
    z = 0,245; a = 0,072; l = –2,567
  z = 1,143; R = 0,845; t = –0,159

Продолжение табл.2.1

       
      x = 8,2; y = 0,003 А = – 4,63; b = 5,527; z = –11,979
    L = 3,927; Z = 11,545; b = 21,318
      y = 1,048; d = 0,116; L = 11,434
    R = 1,022; b = 4,904; z = 3,707
      D = 2,46; Z = –1,04; y = –0,557
      G = –0,294; d = –0,126; z = 1,568  

Окончание табл. 2.1

       
      D = 4,399; y = 1,867; b = 7,003
      y = 0,894; z = 2888; b = 7,968
  R = 3,539; x = 1,174; z = 0,549
  R = 24,504; y = 27,49; z = 11780
  а = 4·10-2; x = 17,6 R = 16928; y = –0,981; L = 16,39
  c = –9,987; d = –12,23; b = –12,23

Задание 3.

Разработать ГСА и программу вычисления значения функции при заданных значениях аргументов и сравнить результат с ответом (табл. 2.2). Ввод данных осуществить с рабочего листа Excel, вывод результата – на рабочий лист Excel с пояснениями.

Таблица 2.2

Задания и значения аргументов для вычисления функций по вариантам

Номер варианта Задание: определить и вывести на экран функцию Исходные данные Ответ
       
  среднее геометрическое чисел A, D, P, если х = 23,3; y = 8,2 3,159
  среднее арифметическое чисел А, В и С, если     х = 1,17; y = 28 7,809
  сумму кубов чисел K, L и N, если х = 2,1; а = 7 7,805× ×1016
    произведение модулей чисел D, R, K, если х = 1,1; а = 0,93 3,555
  разность квадратов чисел A и D, если х = –4,4; y = 2,1 –8,091
  среднее арифметическое чисел Z, R, Y, если х = 6,3; а = 17 4,19× ×1017

Продолжение табл. 2.2

       
    целую часть суммы чисел G, I, U, если х = 12; а = 9,5  
    целую часть разности чисел C, B, если х = 11; а = 10,2 –1
    среднее геометрическое чисел K, P, Y, если х = 5,3; а = 2,9; с = –15 1,522
  целую часть произведения чисел A, N, если х = 12,3; b = 15  
    среднее геометрическое чисел W, R, C, если х = 10,1; b = 1,67 2,23
    сумму кубов чисел А, В, С, если х = 1,17; y = 28  
    среднее геометрическое чисел K, L и N, если х = 2,1; а = 7 31,83

Окончание табл. 2.2





Дата публикования: 2015-04-06; Прочитано: 288 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!



studopedia.org - Студопедия.Орг - 2014-2024 год. Студопедия не является автором материалов, которые размещены. Но предоставляет возможность бесплатного использования (0.007 с)...