Модераторы: mihanik
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> макрос на пропускную способность 
:(
    Опции темы
Dissektor
Дата 26.1.2010, 12:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 24.1.2010

Репутация: нет
Всего: нет



прошу помочь с макросом на тему пропускная способность  вот например есть компьютер в него входит сообщение обозначим T(большое) первое сообщение входит с временем t0 потом попадает в PC там идет обработка это время (Тау ) вот  получается три величины (T ,t,Тау ).Получается три ситуации когда (T самое маленькое , t самое маленькое, Tay самое маленькое) Вот есть макрос на нахождение меньшей величины.
Нужен макрос который покажет что будет если (T самая малая величина то что будет с другими величинами как будет все это работать )
 Sub Sub_aa()
Dim Q(100) As Double
Dim Tw(100) As Double
Cells(1, 1) = Rnd()
Cells(2, 1) = Rnd
Q(1) = 0
For i = 2 To 100
Q(i) = Q(i - 1) + Rnd
Next
For i = 1 To 100
Tw(i) = 1 + Rnd
Next
For i = 1 To 100
Cells(i, 3) = i
Cells(i, 4) = Q(i)
Cells(i, 5) = Tw(i)
Next
Dim a As Double
Dim b As Double
Dim c As Double
Dim d As Double
a = 3
b = 7
c = -5
If a >= b Then
d = b
If b > c Then
d = c
End If
End If
If a < b Then
d = a
If a > c Then
d = c
End If
End If
Cells(8, 1) = a
Cells(9, 1) = b
Cells(10, 1) = c
Cells(11, 1) = d

If a <= b And a <= c Then
d = a
End If
If b <= a And b <= c Then
d = b
End If
If c <= a And c <= b Then
d = c
End If
Cells(8, 2) = a
Cells(9, 2) = b
Cells(10, 2) = c
Cells(11, 2) = d

End Sub

Sub Sub_bb()
Dim ar(10) As Double
Dim n As Double
Dim d As Double

ar(1) = 2.1
ar(2) = 3.2
ar(3) = 5
ar(4) = 2.9
ar(5) = 7.6
ar(6) = 1.1
ar(7) = 4.3
ar(8) = 9.2
ar(9) = 8
ar(10) = 6
d = 10
n = 10
For i = 1 To n
If ar(i) <= d Then
d = ar(i)
n = i
End If
Next
Cells(11, 2) = d
Cells(12, 2) = n
End Sub
PM MAIL   Вверх
RockClimber
Дата 26.1.2010, 14:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 848
Регистрация: 5.5.2006
Где: планета 013 в тен туре

Репутация: 7
Всего: 15



Если честно, я ничего не понял. Вообще.
А этот кусок 
Код
Dim a As Double
Dim b As Double
Dim c As Double
Dim d As Double
a = 3
b = 7
c = -5
If a >= b Then
d = b
- маразм. Если ты пишешь a = 3, b = 7, то как в следующей строке а может оказаться больше b?


--------------------
Хорошо кинутый дятел далеко летит, крепко встревает, долго торчит.
PM MAIL GTalk   Вверх
Akina
Дата 26.1.2010, 14:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 26
Всего: 454



По-моему, речь идёт тупо об аппроксимации, точнее о расчёте постоянной составляющей. Иначе этот словесный бред имхо вообще лишён смысла.



--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Dissektor
  Дата 26.1.2010, 17:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 24.1.2010

Репутация: нет
Всего: нет



Блин какжэ обьяснить то 
PM MAIL   Вверх
Akina
Дата 26.1.2010, 17:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 26
Всего: 454



Цитата(Dissektor @  26.1.2010,  13:31 Найти цитируемый пост)
в него входит сообщение обозначим T(большое) 

Что ты обозначил? размер в байтах? время его прихода? порядковый номер? что-то ещё?
Аналогично по остальным параметрам.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Dissektor
Дата 27.1.2010, 11:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 24.1.2010

Репутация: нет
Всего: нет



T большое это сколько  сообщений стоит в очередь t маленькая это какова скорость этих сообщений  и время тау это сколько они обрабатываются 
PM MAIL   Вверх
Akina
Дата 27.1.2010, 12:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 26
Всего: 454



Пример входных данных, пожалуйста. Строк 10. И желаемый результат расчёта на основании этих входных данных.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Dissektor
Дата 27.1.2010, 13:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 24.1.2010

Репутация: нет
Всего: нет




    
прошу помочь с макросом на тему пропускная способность  вот например есть компьютер в него входит сообщение обозначим T(большое) первое сообщение входит с временем t0 потом попадает в PC там идет обработка это время (Тау ) вот  получается три величины (T ,t,Тау ).Получается три ситуации когда (T самое маленькое , t самое маленькое, Tay самое маленькое) Вот есть макрос на нахождение меньшей величины.
Нужен макрос который покажет что будет если (T самая малая величина то что будет с другими величинами как будет все это работать )
 Sub Sub_aa()
Dim Q(100) As Double
Dim Tw(100) As Double
Cells(1, 1) = Rnd()
Cells(2, 1) = Rnd
Q(1) = 0
For i = 2 To 100
Q(i) = Q(i - 1) + Rnd
Next
For i = 1 To 100
Tw(i) = 1 + Rnd
Next
For i = 1 To 100
Cells(i, 3) = i
Cells(i, 4) = Q(i)
Cells(i, 5) = Tw(i)
Next
Dim a As Double
Dim b As Double
Dim c As Double
Dim d As Double
a = 3---------------------------------- например это время Тау 
b = 7---------------------------------- это например Т (большое)
c = -5--------------------------------- это t 
If a >= b Then
d = b
If b > c Then
d = c
End If
End If

нужен скрипт который покажет что произойдет в трех вариантов например самое маленькое Тау второй вариант самое маленькое T(большое) и самое маленькое t 
PM MAIL   Вверх
Dissektor
Дата 28.1.2010, 21:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 5
Регистрация: 24.1.2010

Репутация: нет
Всего: нет



вот еще не много инфы  латинская буква тау... просто через нее обозначаем что-либо в основном неизвестное время.

ТЕК входа-выхода...Last Input First Output))
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Программирование, связанное с MS Office"
mihanik staruha

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами



  • Несанкционированная реклама на форуме запрещена
  • Пожалуйста, давайте своим темам осмысленный, информативный заголовок. Вопль "Помогите!" таковым не является.
  • Чем полнее и яснее Вы изложите проблему, тем быстрее мы её решим.
  • Оставляйте свои записи в "Книге отзывов о работе администрации"
  • А вот тут лежит FAQ нашего подраздела


Если Вам понравилась атмосфера форума, заходите к нам чаще!
С уважением mihanik и staruha.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Программирование, связанное с MS Office | Следующая тема »


 




[ Время генерации скрипта: 0.0485 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.