Извлечь корень 3...n степеней

@ppbanderas · Регистрация: 29.12.2010

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

Подскажите пожалуйста в вб можно извлеч корень 3...n степеней.

@gaw · 20.10.2011, 22:13

a^(1/3...n)

@ppbanderas · 21.10.2011, 09:32 **[ТС]**

Отлично.Большое спасибо

@ppbanderas · 24.10.2011, 16:07 **[ТС]**

И еще вопрос как привести результат матем. функции к читаемому формату. А то получается 0,0564684684Е-5 .

@gaw · 24.10.2011, 16:28

round(число, количество знаков после зпт)

a=round(b,4)

Добавлено через 2 минуты
Функция Format
Форматирование числовых и денежных величин
Стандартные форматы числовых величин
Пользовательские форматы числовых величин
General Number
Отображает число без разделителей групп разрядов

A=123456.789
Print Format(A,"General Number") ' возвратит 123456.789
Currency
Отображает значение с разделителями групп разрядов (если требуется). В настройке США отображает две цифры справа от десятичного разделителя. Обозначение денежной единицы и ее положение относительно числа определяется текущей национальной настройкой

A=123456.789
Print Format(A,"Currency") ' возвратит 123 456,79р.
Fixed
Отображает по крайней мере одну цифру слева и две цифры справа от десятичного разделителя

A=123456.789
Print Format(A,"Fixed") ' возвратит 123456,79
Standard
Отображает по крайней мере одну цифру слева и две цифры справа от десятичного разделителя, а также разделители групп разрядов

A=123456.789
Print Format(A,"Standard") ' возвратит 123 456,79
Percent
Отображает число, умноженное на 100, со знаком процентов (%), добавленным справа. Всегда отображает две цифры справа от десятичного разделителя

A=1.23
Print Format(A,"Percent") ' возвратит 123,00%
Scientific
Использует стандартную экспоненциальную нотацию

A=123456.789
Print Format(A,"Scientific") ' возвратит 1,23E+00
Примечание:При форматировании стандартными форматами числа округляются,а не усекаются по стандартным правилам округления
Пользовательские форматы числовых величин
Пользовательский формат чисел(аргумент format) может содержать до четырех разделов,возможно пустых, разделенных точками с запятой(

.Каждый раздел предназначен для раздельного форматирования следующих категорий чисел:
Число разделов

1
Данный формат применяется ко всем значениям
2
Первый элемент применяется к положительным и нулевым значениям, а второй к отрицательным значениям
3
Первый элемент применяется к положительным значениям, второй к отрицательным значениям, а третий к нулевым значениям
4
Первый элемент применяется к положительным значениям, второй к отрицательным значениям, третий к нулевым значениям, а четвертый к значениям Null
Пример
' Пример формата,содержащего два раздела-первый применяется к положительным и нулевым значениям, а второй к отрицательным значениям
"$#,##0;($#,##0)"
' Если формат содержит символы точки с запятой, между которыми ничего нет, значения, соответствующие пропущенному элементу, изображаются согласно формату положительных значений. Например, следующий формат отображает положительные и отрицательные значения согласно первому элементу, а вместо нулевых значений отображает строку "Нуль"
"$#,##0;;\Н\у\л\ь"

@ppbanderas · 24.10.2011, 17:14 **[ТС]**

Отлично. Большое спасибо. Есть еще вопрос. Но тут я его задавать не буду, а как и положено, создам новую тему

@desant · 21.02.2019, 01:23

Искал в инете, так толком и не нашел, по тому тут выложу что сделал, вроде в тему, тут положительное и отрицательное число из n-го степени корня, странно что нет встроенной (вернее я не знаю) функции для этого в vb , только для квадратного корня)))

Visual Basic
1
2
3
4
5
6
7
8
                f = a 'число 
                h = 5 '  корень n-й степени
                If f < 0 Then
                    g = -1 * (Abs(a) ^ (1 / h)) ' отрицательное число 
                ElseIf f >= 0 Then
                    g = (Abs(a) ^ (1 / h)) ' положительное число 
 
                End If

@wer1 · 21.02.2019, 07:30

Уважаемый desant,
это можно записать короче использую функцию Sgn()

Visual Basic
1
g = Sgn(a) * Abs(a) ^ (1 / h)

SoftIce · 21.02.2019, 07:30

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

отрицательное число

Ваш код работает с комплексными числами ?

@Казанский · 21.02.2019, 09:12

desant, в случае отрицательного числа надо еще проверить, что h является целым и нечетным. А то корень 2 степени из -4 получается -2.
Кстати, в Excel функция листа СТЕПЕНЬ умеет работать с отрицательными числами

Code
1
2
?worksheetfunction.Power(-125,1/3)
-5

@desant · 21.02.2019, 13:12

нтч, , странно, в 13 версии vb такой функции нету ))) за то есть Sign().
Казанский, тоже замечание существенное по тому не много изменил :

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
                f = a 'число 
                h = 5 '  корень n-й степени
                If (h Mod 2 = 0) Then
 
                    If f < 0 Then
                        error_a.Text = "Неверное число," + vbCrLf + "корень из отрицательного числа."
                        error_a.Visible = True
 
                    ElseIf f >= 0 Then
                        g = (a) ^ (1 / h) ' положительное число 
                    End If
                Else
                    g = Sign(a) * (Abs(a) ^ (1 / h))
                End If

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки 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. Задача: реализовать контроль корректности заполнения дат назначения. . .

@ppbanderas 1 / 1 / 0 Регистрация: 29.12.2010 Сообщений: 104

	Извлечь корень 3...n степеней 20.10.2011, 21:31. Показов 14133. Ответов 10 Метки нет (Все метки) Подскажите пожалуйста в вб можно извлеч корень 3...n степеней. 0

@gaw 6644 / 1511 / 169 Регистрация: 09.01.2010 Сообщений: 4,298
	20.10.2011, 22:13
	a^(1/3...n) 0

@ppbanderas 1 / 1 / 0 Регистрация: 29.12.2010 Сообщений: 104
	21.10.2011, 09:32 [ТС]
	Отлично.Большое спасибо 0

@ppbanderas 1 / 1 / 0 Регистрация: 29.12.2010 Сообщений: 104
	24.10.2011, 16:07 [ТС]
	И еще вопрос как привести результат матем. функции к читаемому формату. А то получается 0,0564684684Е-5 . 0

@gaw 6644 / 1511 / 169 Регистрация: 09.01.2010 Сообщений: 4,298
	24.10.2011, 16:28
	round(число, количество знаков после зпт) a=round(b,4) Добавлено через 2 минуты Функция Format Форматирование числовых и денежных величин Стандартные форматы числовых величин Пользовательские форматы числовых величин General Number Отображает число без разделителей групп разрядов A=123456.789 Print Format(A,"General Number") ' возвратит 123456.789 Currency Отображает значение с разделителями групп разрядов (если требуется). В настройке США отображает две цифры справа от десятичного разделителя. Обозначение денежной единицы и ее положение относительно числа определяется текущей национальной настройкой A=123456.789 Print Format(A,"Currency") ' возвратит 123 456,79р. Fixed Отображает по крайней мере одну цифру слева и две цифры справа от десятичного разделителя A=123456.789 Print Format(A,"Fixed") ' возвратит 123456,79 Standard Отображает по крайней мере одну цифру слева и две цифры справа от десятичного разделителя, а также разделители групп разрядов A=123456.789 Print Format(A,"Standard") ' возвратит 123 456,79 Percent Отображает число, умноженное на 100, со знаком процентов (%), добавленным справа. Всегда отображает две цифры справа от десятичного разделителя A=1.23 Print Format(A,"Percent") ' возвратит 123,00% Scientific Использует стандартную экспоненциальную нотацию A=123456.789 Print Format(A,"Scientific") ' возвратит 1,23E+00 Примечание:При форматировании стандартными форматами числа округляются,а не усекаются по стандартным правилам округления Пользовательские форматы числовых величин Пользовательский формат чисел(аргумент format) может содержать до четырех разделов,возможно пустых, разделенных точками с запятой(.Каждый раздел предназначен для раздельного форматирования следующих категорий чисел: Число разделов 1 Данный формат применяется ко всем значениям 2 Первый элемент применяется к положительным и нулевым значениям, а второй к отрицательным значениям 3 Первый элемент применяется к положительным значениям, второй к отрицательным значениям, а третий к нулевым значениям 4 Первый элемент применяется к положительным значениям, второй к отрицательным значениям, третий к нулевым значениям, а четвертый к значениям Null Пример ' Пример формата,содержащего два раздела-первый применяется к положительным и нулевым значениям, а второй к отрицательным значениям "$#,##0;($#,##0)" ' Если формат содержит символы точки с запятой, между которыми ничего нет, значения, соответствующие пропущенному элементу, изображаются согласно формату положительных значений. Например, следующий формат отображает положительные и отрицательные значения согласно первому элементу, а вместо нулевых значений отображает строку "Нуль" "$#,##0;;\Н\у\л\ь" 0

@ppbanderas 1 / 1 / 0 Регистрация: 29.12.2010 Сообщений: 104
	24.10.2011, 17:14 [ТС]
	Отлично. Большое спасибо. Есть еще вопрос. Но тут я его задавать не буду, а как и положено, создам новую тему 0