Visual Basic

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
VB Составьте алгоритм, утраивающий каждую букву в заданном тексте. Выведите полученную строку на экран переделайте плиз в бэйсик program slava_1; uses crt; var s: string; function three(s: string): string; var n, i: integer; c: char; https://www.cyberforum.ru/ visual-basic/ thread597150.html	VB При повторном счете цикла, не запоминается значения предыдущего цикла Не могу разобраться в чем проблема. При повторном счете цикла, не запоминается значения предыдущего цикла, как это исправить? И вообще получается, что за пределами цикла все полученные значения не сохраняются.
VB Как найти среднее арифметическое значение Здравствуйте, помогите пожалуста, немогу сообразить как решить средне арифметическое значение в VB6.0 Формула LR=(d+k)/t? при этом d, k, t, известны, найти только LR(одно значение)! https://www.cyberforum.ru/ visual-basic/ thread596980.html	VB Поменять местами первый и последний символы строки, а так же третий и десятый символы Завтра экзамен по информатике, для допуска нужно сдать последнюю задачу, помогите пожалуйста ее решить:) "Дана строка длиной N символов. Поменять местами первый и последний символы строки, а так же третий и десятый символы. Выдать на экран исходную и измененную строки." Microsoft Visual Basic. https://www.cyberforum.ru/ visual-basic/ thread596788.html
Создание таблицы 10х10 VB Здравствуйте все! Мне необходимо нарисовать таблицу в VB. Она должна быть 10х10 подскажите как это реализовать?	VB Сформировать массив значений M(x,y) при шаге в дельта Х, число значений N, где y=sin(x)/x Функция y=sinx/x. Сформировать массив значений M(x,y) при шаге в дельта Х, число значений N https://www.cyberforum.ru/ visual-basic/ thread596686.html
VB В массиве Q(n,m) заменить каждый отрицательный элемент произведением его индексов https://www.cyberforum.ru/ visual-basic/ thread596419.html В массиве Q(n,m) заменить каждый отрицательный элемент произведением его индексов.	VB В массиве F(n,m) заменить элементы в к-ом столбце нулями В массиве F(n,m) заменить элементы в k-ом столбце нулями.
VB В массиве B(n,m) заменить элементы в к-ой строке единицами В массиве B(n,m) заменить элементы в k-ой строке единицами. https://www.cyberforum.ru/ visual-basic/ thread596414.html	VB Дано число а. Определить, сколько раз это число встречается в массиве T(n,n) https://www.cyberforum.ru/ visual-basic/ thread596409.html Дано число а. Определить, сколько раз это число встречается в массиве T(n,n).
В массиве Z(n,m) вычислить произведение элементов, стоящих по главной диагонали VB В массиве Z(n,m) вычислить произведение элементов, стоящих по главной диагонали.	VB Исследование методов сортировки массивов: Ошибка в работе программы https://www.cyberforum.ru/ visual-basic/ thread596363.html Добый вечер, помогите найти ошибку в программе Private Sub BinarIns_Click() frmSchemeBinar.Show vbModal End Sub Private Sub MDIForm_Load()

yahalifeer

1 / 0 / 0

Регистрация: 25.12.2011

Сообщений: 26

Вставить в задачу подпрограмму, делающую возведение в степень - VB - Ответ 3128341

05.06.2012, 17:29. Показов 917. Ответов 2

Метки (Все метки)

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

Вот есть программа, считающая функцию:

Visual Basic

Private Sub CommandButton1_Click()
 Dim A As Integer, T As Integer, N As Integer, M As Integer, C As Integer, i As Integer, F As Double
 A = Val(TextBox1)
 Do
  C = Val(TextBox2)
 Loop Until C <> 0
 Do
  T = Val(TextBox3)
 Loop Until T > 0
 Do
  M = Val(TextBox4)
 Loop Until M > 0
 C = Exp(M * Log(C))  ' C в степени M
 N = Val(TextBox5)
 ReDim x(T) As Double, y(M) As Double
 F = 0
 For i = 1 To T
  x(i) = Fix(Rnd*10)
  F = F + Exp(N * Log(x(i) + A))
 Next i
 For i = 1 To M
  y(i) = Fix(Rnd*10)
  F = F + y(i) / C
 Next i
 MsgBox "F= " & F, , "Вычисленное значение"
End Sub

Нужно переделать задачу так, чтобы возведение чисел в степень происходило при помощи подпрограмм, например, "Exp(N * Log(x(i) + A))" и "C = Exp(M * Log(C))"

Вернуться к обсуждению:
Вставить в задачу подпрограмму, делающую возведение в степень VB

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

05.06.2012, 17:29

Готовые ответы и решения:

Возведение числа в степень за минимальное количество умножений, не используя возведение в степень (в чем ошибка?)
должно число подводиться в степень за минимальное кол умножения не используя возведение в степень....

Вычислить сумму чисел от 1 до N, возведенных в степень M. Возведение в степень оформить как многократное умножение
Не знаю как это написать.. или объясните пожалуйста или помогите сделать)

Не пользуясь операцией возведение в степень возвести число а в степень n
Помогите написать программу , очень надо

Бинарное возведение в степень числа типа BigInteger в степень Biginteger
Здравствуйте. Не могу реализовать алгоритм бинарного возведения в степень. Есть 2 экземпляра...

	05.06.2012, 17:29

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

05.06.2012, 17:29

Помогаю со студенческими работами здесь

Возведение в степень
Всем привет! Нужно найти значение выражения 2^(x^y), х=3,251, у=0,325. Что-то я запуталась... То...

Возведение в степень
Подскажите каким методом можно осуществить возведение в любую степень любого неотрицательного числа.

Возведение в степень
Здравствуйте, помогите пожалуйста решить задачу: возвести в степень n число n,где n<=100.

Возведение в степень
Написать подпрограмму возведения числа в целую степень. Проверить ее работу на следующих данных: 2...

Наверх