Страница: 1 | 2 |
Вопрос: Среднее арифметическое
Добавлено: 31.12.06 13:37
Автор вопроса: VβÐUηìt | Web-сайт:
Ответы
Всего ответов: 30
Номер ответа: 16
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #16
Добавлено: 31.12.06 19:13
тьфу ты, я имел в виду
16777216 * 1000000000 < 1,844674407371E19
Номер ответа: 17
Автор ответа:
W[4Fh]LF
Вопросов: 0
Ответов: 187
Web-сайт:
Профиль | | #17
Добавлено: 31.12.06 19:25
Диапазон значения с которыми может работать double очень велик: 10^(-308) - 10^308, ясное дело, что работать надо с этими типами данных, но это всё нифига не даёт, ибо где хранить такой объём данных? От файла размером в гиг ВБ загнётся навечно. Поэтому используй исключительно API и поблочное чтение/запись.
Номер ответа: 18
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #18
Добавлено: 31.12.06 20:08
А зачем хранить? Нужно ж получить среднее значение и ладно...
Вопрос-то не о хранении...
Номер ответа: 19
Автор ответа:
GSerg
Вопросов: 0
Ответов: 1876
Профиль | | #19
Добавлено: 31.12.06 20:41
Нда.
Такую хрень так долго обсуждать. Нет слов...
В школу ходить надо. Хотя бы иногда.
Private Type Average
CurAverage As Double
CurSummandCount As Long
End Type
Private Sub AddSummand(a As Average, ByVal Summand As Double)
Dim t As Long
t = a.CurSummandCount + 1
a.CurAverage = (a.CurAverage * a.CurSummandCount + Summand) / t
a.CurSummandCount = t
End Sub
Private Sub Form_Load()
Dim MyAverage As Average
AddSummand MyAverage, 3
AddSummand MyAverage, 4
AddSummand MyAverage, 5
MsgBox MyAverage.CurAverage
End Sub
Номер ответа: 20
Автор ответа:
W[4Fh]LF
Вопросов: 0
Ответов: 187
Web-сайт:
Профиль | | #20
Добавлено: 31.12.06 21:18
GSerg вот и сходи туда, может быть там умники ценяться больше.
Я вообще не могу понять, я считаю, что автор хочет хранить все полученные значения, если нет, то чём он тупит и вводит всех в заблуждение своим батлфилдом и миллиардами значений? Решение было предложено ещё в ответе №4.
Номер ответа: 21
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #21
Добавлено: 31.12.06 21:29
Но готовый код - первым написал GSerg, все мы ленивые. ему "+"
Номер ответа: 22
Автор ответа:
Morpheus
Вопросов: 224
Ответов: 3777
Web-сайт:
Профиль | | #22
Добавлено: 31.12.06 21:31
Эту тему надо в "Работу с данными" так как кроме размера структуры с данными, вопрос сам по себе элементарен
Номер ответа: 23
Автор ответа:
W[4Fh]LF
Вопросов: 0
Ответов: 187
Web-сайт:
Профиль | | #23
Добавлено: 31.12.06 21:59
Но готовый код - первым написал GSerg, все мы ленивые. ему "+"
Твоё предложение не совсем правильно построено, поэтому оно может быть понятно двояко
Плюс, согласен, но к чему эти попытки принизить чужое достоинство? Со стороны ветерана форума это смотрится ещё некрасивее. А, впрочем, насрать.
Номер ответа: 24
Автор ответа:
GSerg
Вопросов: 0
Ответов: 1876
Профиль | | #24
Добавлено: 31.12.06 22:05
А их и не было.
Просто очень тронул пост №7. Про то, что нет выхода.
Номер ответа: 25
Автор ответа:
Morpheus
Вопросов: 224
Ответов: 3777
Web-сайт:
Профиль | | #25
Добавлено: 31.12.06 22:15
Хех Жжошь товарищь
Номер ответа: 26
Автор ответа:
-АлександР-
Вопросов: 55
Ответов: 1008
Web-сайт:
Профиль | | #26
Добавлено: 31.12.06 23:10
Причем, я больше шутил, чем говорил всеръез. В общем-то твой четвертый пост
Номер ответа: 27
Автор ответа:
VβÐUηìt
Вопросов: 246
Ответов: 3333
Web-сайт:
Профиль | | #27
Добавлено: 31.12.06 23:43
Вощем пофигу, всех с Новым годом! ))))))))))))))))))))))))
Номер ответа: 28
Автор ответа:
Morpheus
Вопросов: 224
Ответов: 3777
Web-сайт:
Профиль | | #28
Добавлено: 01.01.07 03:10
Да(х)!
Номер ответа: 29
Автор ответа:
W[4Fh]LF
Вопросов: 0
Ответов: 187
Web-сайт:
Профиль | | #29
Добавлено: 01.01.07 11:32
Я не про тебя говорил))
Номер ответа: 30
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #30
Добавлено: 02.01.07 23:26
или в ресурс.
плакал...
бесконечен
На определённый момент, он будет конечен