Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/43: Рейтинг темы: голосов - 43, средняя оценка - 4.63
 Аватар для irineyxxx
151 / 53 / 11
Регистрация: 18.09.2011
Сообщений: 730

Что такое квадратный корень?

02.11.2011, 18:36. Показов 8271. Ответов 16
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите пожалуйста как кодом можно написать следующее:
[смотрите на картинку]


If A <= -3 Then B = (Sqr(A)/3) - вот типа того, только тут ошибку задает
Изображения
 
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
02.11.2011, 18:36
Ответы с готовыми решениями:

Вычислить квадратный корень из суммы квадратов элементов
Добрый вечер уважаемые форумчане.Помогите решить задачку,с програмированием сталкиваюсь впервые - Вычислить квадратный корень из суммы...

Вычислить сумму квадратов всех элементов массива и корень квадратный этой суммы.
Помогите пожалуйста задачу решить: В программе должны быть описаны, а при выполнении программы последовательно вызваны три...

Что нужно дописать чтобы при условиях у2>0 он извлекал из у2 квадратный корень?
program drtdfg; var x, a, b, f, d, y, y1, y2: real; begin x:=1; a:=3; b:=3; f:=3; d:=3; y:= ((sin(x)* sin(x) * x *x)+...

16
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 18:37
что такое квадратный корень знаешь?это число^(1/2) ну и соответственно с кубическим тоже самое только число^(1/3)
0
97 / 72 / 28
Регистрация: 08.10.2011
Сообщений: 130
02.11.2011, 18:46
Visual Basic
1
2
3
4
5
6
7
8
9
10
Sub macros()
If x<=-3 Then
y=Sqr(x)^(1/3)
Elseif x>-3 And x<1 Then
y=e^(x+1)
Elseif x>=1 Then
y=Sqr(x)
End if
MsgBox y
End Sub
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 18:53
y=Sqr(x)^3
квадратный корень в степени 3 это и есть кубический корень?
0
97 / 72 / 28
Регистрация: 08.10.2011
Сообщений: 130
02.11.2011, 18:58
Извините, исправил ошибку.
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 18:59
Visual Basic
1
y=x^(1/3)
0
97 / 72 / 28
Регистрация: 08.10.2011
Сообщений: 130
02.11.2011, 19:01
Visual Basic
1
2
3
4
5
6
7
8
9
10
Sub macros()
If x<=-3 Then
y=x^(1/3)
Elseif x>-3 And x<1 Then
y=e^(x+1)
Elseif x>=1 Then
y=Sqr(x)
End if
MsgBox y
End Sub
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 19:09
да и e это вроди экспонента а не переменная
0
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
02.11.2011, 19:45
Цитата Сообщение от programmer_11 Посмотреть сообщение
if x>=1 Then
это по сути лишнее, условие выполняется как остаточное после 2 предыдущих

Добавлено через 29 минут
Цитата Сообщение от SuPeR XaKer Посмотреть сообщение
y=x^(1/3)
и это при x<-3 кажется ошибка
0
 Аватар для gitarillo
755 / 554 / 48
Регистрация: 17.06.2010
Сообщений: 1,041
Записей в блоге: 1
02.11.2011, 20:18
Цитата Сообщение от programmer_11 Посмотреть сообщение
Visual Basic
1
y=e^(x+1)
Шутите?
Visual Basic
1
y=Exp(1+x)
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 20:42
и это при x<-3 кажется ошибка
нет.Всё верно.
0
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
02.11.2011, 20:54
Visual Basic
1
MsgBox (-4) ^ (1 / 3)
? /-4<-3/
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 21:15
Visual Basic
1
MsgBox -4 ^ (1 / 3)
?
Visual Basic
1
MsgBox -(4) ^ (1 / 3)
?
0
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
02.11.2011, 21:25
Цитата Сообщение от programmer_11 Посмотреть сообщение
If x<=-3 Then
y=x^(1/3)
вот тут
y=x^(1/3) <===> msgbox(-4)^(1/3)
или
Visual Basic
1
2
x = -4
MsgBox (x) ^ (1 / 3)
это не работает

Добавлено через 1 минуту
а это работает, ибо сначала 4 возводится в степень, после чего умножается на (-1)
Цитата Сообщение от SuPeR XaKer Посмотреть сообщение
MsgBox -(4) ^ (1 / 3)
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 21:25
Visual Basic
1
2
x = -4
MsgBox -(Abs(x)) ^ (1 / 3)
теперь работает.
MsgBox -(4) ^ (1 / 3)
у меня работает.
0
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
02.11.2011, 21:27
точно так же и это работает
Цитата Сообщение от SuPeR XaKer Посмотреть сообщение
MsgBox -4 ^ (1 / 3)
Добавлено через 37 секунд
Цитата Сообщение от SuPeR XaKer Посмотреть сообщение
теперь работает.


Добавлено через 1 минуту
чисто для этой задачки достаточно MsgBox -(-x) ^ (1 / 3)
0
 Аватар для SuPeR XaKer
2857 / 1986 / 788
Регистрация: 23.09.2010
Сообщений: 4,876
02.11.2011, 21:33
можно ещё так сделать
Visual Basic
1
-exp(log(abs(x))/3)

Не по теме:

просто для примера.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
02.11.2011, 21:33
Помогаю со студенческими работами здесь

Как реализовать функции что бы найти синус, косинус, корень квадратный, степень от числа
Добрый вечер,разрабатываю калькулятор на winapi хотелось бы узнать как реализовать функции что бы найти синус,косинус,корень...

С помощью рекурсивной функции найдити квадратный корень Y=корень из X, воспользовавшись итерационной формулой Ньютона
С помощью рекурсивной функции найдите с заданной точностью квадратный корень Y=корень из X , воспользовавшись итерационной формулой...

Напишите программу «КОРЕНЬ», которая запрашивает число и выдает корень квадратный из заданного числа
Напишите программу «КОРЕНЬ», которая запрашивает число и выдает корень квадратный из заданного числа. Запросы продолжаются до тех пор,...

Квадратный корень и квадратный квадрат
Найдите такое число x, что x^2+√x=C , с точностью не менее 6 знаков после точки. Входные данные В единственной строке содержится...

Квадратный корень
Всем доброго времени суток! Как вычислить квадратный корень переменной???Напишите подробный синтаксис,весь инет пересмотрел,пробовал все...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
17
Ответ Создать тему
Новые блоги и статьи
Автозаполнение реквизита при выборе элемента справочника
Maks 27.03.2026
Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .
Команды формы и диалоговое окно
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru