Извлечь корень 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

Новые блоги и статьи Все статьи Все блоги /
PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Access VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro	Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .	Мысли в слух kumehtar 18.11.2025 Кстати, совсем недавно имел разговор на тему медитаций с людьми. И обнаружил, что они вообще не понимают что такое медитация и зачем она нужна. Самые базовые вещи. Для них это - когда просто люди. . .	Создание Single Page Application на фреймах krapotkin 16.11.2025 Статья исключительно для начинающих. Подходы оригинальностью не блещут. В век Веб все очень привыкли к дизайну Single-Page-Application . Быстренько разберем подход "на фреймах". Мы делаем одну. . .

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

	Извлечь корень 3...n степеней 20.10.2011, 21:31. Показов 13998. Ответов 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