Умножение многих значений сразу при расчетах по формуле

@Zlodey · Регистрация: 11.05.2012

Студворк — интернет-сервис помощи студентам

Мне нужно расчитать по формуле a=b\(c*d*e*f*k*l) как? если умножаешь больше 2х сразу то перезаполнение

@Catstail · 20.12.2012, 19:23

a=b / (c*d*e*f*k*l)=(((((b/c)/d)/e)/f)/k)/l

@Zlodey · 20.12.2012, 19:55 **[ТС]**

Text1.Text = Val(Text2.Text) / (Val(Text3.Text) * Val(Text4.Text) * Val(Text5.Text) * Val(Text6.Text) * Val(Text7.Text) * Val(Text8.Text)) = (((((Val(Text2.Text) / Val(Text3.Text)) / Val(Text4.Text)) / Val(Text5.Text)) / Val(Text6.Text)) / Val(Text7.Text)) / Val(Text8.Text)
ответ не зависимо от введённых значений пишет "True"

SoftIce · 20.12.2012, 20:14

Не надо всё понимать буквально

Visual Basic
1
Text1.Text = (((((Val(Text2.Text) / Val(Text3.Text)) / Val(Text4.Text)) / Val(Text5.Text)) / Val(Text6.Text)) / Val(Text7.Text)) / Val(Text8.Text)

Если,конечно, скобки правильно стоят.

@Zlodey · 20.12.2012, 21:23 **[ТС]**

такс, теперь если значение "0,01" пишет деление на ноль если "0.01" то всё считает, но беда в том что предыдущие формы выводят значения с запятой а я беру их из тех форм, тоесть чтоб посчитать мне в ручную надо менять запятые на точки, что не так?

SoftIce · 20.12.2012, 21:39

Visual Basic
1
a=val(replace(Text1.Text,",","."))

И пофигу, с точкой число в текстбоксе или с запятой

@Zlodey · 20.12.2012, 21:42 **[ТС]**

после манипуляций а танцев с бубном стало считать но ответ теперь 1,#INF

SoftIce · 20.12.2012, 21:48

В знаменателе очень маленькое число (или очень большое)

@Zlodey · 20.12.2012, 22:02 **[ТС]**

я вот сомневаюсь с формулой, мне надо было разделить первое число на производную от всех остальных а в той что вы написали просто делиться на все остальные

SoftIce · 20.12.2012, 22:07

Сообщение от Zlodey

я вот сомневаюсь с формулой, мне надо было разделить первое число на производную от всех остальных а в той что вы написали просто делиться на все остальные

Я вообще то ничего сам не придумывал, просто укоротил вашу формулу.

@Zlodey · 20.12.2012, 22:16 **[ТС]**

вообщем надо что то вроде этого text2.text/((text3.text^2)*text4.text*text5.text*te xt6.text*text7.text*text8.text)

SoftIce · 20.12.2012, 22:20

Сообщение от Zlodey

a=b\(c*d*e*f*k*l)

если так , то лучше написать так

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Command1_Click()
    Dim a As Double, b As Double, c As Double, d As Double
    Dim e As Double, f As Double, k As Double, l As Double
    b = Val(Replace(Text2.Text, ",", "."))
    c = Val(Replace(Text3.Text, ",", "."))
    d = Val(Replace(Text4.Text, ",", "."))
    e = Val(Replace(Text5.Text, ",", "."))
    f = Val(Replace(Text6.Text, ",", "."))
    k = Val(Replace(Text7.Text, ",", "."))
    l = Val(Replace(Text8.Text, ",", "."))
 
    a = (((((b / c) / d) / e) / f) / k) / l
 
    Text1.Text = a
End Sub

Так путаницы меньше

@Zlodey · 20.12.2012, 22:39 **[ТС]**

Спасибо большое) помогло)

Новые блоги и статьи Все статьи Все блоги /
Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .	Архитектура слоя интернета для сервера-слоя. Hrethgir 11.04.2026 В продолжение https:/ / www. cyberforum. ru/ blogs/ 223907/ 10860. html Знаешь что я подумал? Раз мы все источники пишем в голове ветки, то ничего не мешает добавить в голову такой источник, который сам. . .
Подстановка значения реквизита справочника в табличную часть документа Maks 10.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: при выборе сотрудника (справочник Сотрудники) в ТЧ документа. . .	Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .

@Zlodey 0 / 0 / 0 Регистрация: 11.05.2012 Сообщений: 26

	Умножение многих значений сразу при расчетах по формуле 20.12.2012, 19:16. Показов 995. Ответов 12 Метки нет (Все метки) Мне нужно расчитать по формуле a=b\(cdefk*l) как? если умножаешь больше 2х сразу то перезаполнение 0

@Catstail Супер-модератор 38203 / 21135 / 4310 Регистрация: 12.02.2012 Сообщений: 34,740 Записей в блоге: 14
	20.12.2012, 19:23
	a=b / (cdefk*l)=(((((b/c)/d)/e)/f)/k)/l 0

@Zlodey 0 / 0 / 0 Регистрация: 11.05.2012 Сообщений: 26
	20.12.2012, 19:55 [ТС]
	Text1.Text = Val(Text2.Text) / (Val(Text3.Text) * Val(Text4.Text) * Val(Text5.Text) * Val(Text6.Text) * Val(Text7.Text) * Val(Text8.Text)) = (((((Val(Text2.Text) / Val(Text3.Text)) / Val(Text4.Text)) / Val(Text5.Text)) / Val(Text6.Text)) / Val(Text7.Text)) / Val(Text8.Text) ответ не зависимо от введённых значений пишет "True" 0

@Zlodey 0 / 0 / 0 Регистрация: 11.05.2012 Сообщений: 26
	20.12.2012, 21:23 [ТС]
	такс, теперь если значение "0,01" пишет деление на ноль если "0.01" то всё считает, но беда в том что предыдущие формы выводят значения с запятой а я беру их из тех форм, тоесть чтоб посчитать мне в ручную надо менять запятые на точки, что не так? 0

@Zlodey 0 / 0 / 0 Регистрация: 11.05.2012 Сообщений: 26
	20.12.2012, 21:42 [ТС]
	после манипуляций а танцев с бубном стало считать но ответ теперь 1,#INF 0

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	20.12.2012, 21:48
	В знаменателе очень маленькое число (или очень большое) 0

@Zlodey 0 / 0 / 0 Регистрация: 11.05.2012 Сообщений: 26
	20.12.2012, 22:02 [ТС]
	я вот сомневаюсь с формулой, мне надо было разделить первое число на производную от всех остальных а в той что вы написали просто делиться на все остальные 0

@Zlodey 0 / 0 / 0 Регистрация: 11.05.2012 Сообщений: 26
	20.12.2012, 22:16 [ТС]
	вообщем надо что то вроде этого text2.text/((text3.text^2)text4.texttext5.textte xt6.texttext7.text*text8.text) Изображения 0

@Zlodey 0 / 0 / 0 Регистрация: 11.05.2012 Сообщений: 26
	20.12.2012, 22:39 [ТС]
	Спасибо большое) помогло) 0