Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
1 / 0 / 1
Регистрация: 09.12.2016
Сообщений: 57

Вычисление арифметического выражения

15.09.2017, 06:50. Показов 819. Ответов 4
Метки нет (Все метки)

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

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

VB.NET
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim x, y, j, c, n, q, t, s, m As Double, p As Single, k As Integer
        Dim s1, s2 As String
        x = TextBox1.Text
        y = TextBox2.Text
        m = Abs(x - 6)
        q = Log(m) / Log(10)
        t = Sin(x ^ 2)
        s = x ^ 3
        c = (x * q) - (t / (y * s))
        p = c
        k = c
        j = Fix(c)
        n = Int(c)
        s1 = c
        s2 = p
        TextBox3.Text = c
        TextBox4.Text = k
        TextBox5.Text = j
        TextBox6.Text = n
        TextBox7.Text = p
        TextBox8.Text = c + p
        TextBox9.Text = s1 + s2
 
 
    End Sub
В ответе моей формы при вводе значений x = 24, y = 13 - ответ c = 972, в то время как во всех калькуляторах c=30. (значения приблизительные, не уточняю после запятой, т.к. разница большая между числами).

Буду благодарен за помощь, заранее спасибо.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
15.09.2017, 06:50
Ответы с готовыми решениями:

Вычисление среднего арифметического
If button.Name = "OpMean" Then Dim aaaa As String = TextBox1.Text Dim bbbb As String = TextBox2.Text ...

Вычисление арифметического выражения
Помогите до делать \nu = \frac{1+sin^2\left(x+y \right)}{\left|x-\frac{2y}{1+x^2y^2} \right|}\,x^{\left|y \right|}+cos^2\left(arctg...

Вычисление арифметического выражения
Составьте программу, вычисляющую значение арифметического выражения. Входные данные - 32-разрядные знаковые целые десятичные числа, которые...

4
6644 / 1511 / 169
Регистрация: 09.01.2010
Сообщений: 4,298
15.09.2017, 07:39
зачем 12 строка
Вы формулу покажите
0
1 / 0 / 1
Регистрация: 09.12.2016
Сообщений: 57
15.09.2017, 07:46  [ТС]
Вот формула.
Изображения
 
0
117 / 110 / 31
Регистрация: 05.04.2014
Сообщений: 224
15.09.2017, 15:22
Benkendorf, твой код выдает результат 30,126545052327
Вроде правильно.
0
1 / 0 / 1
Регистрация: 09.12.2016
Сообщений: 57
15.09.2017, 22:04  [ТС]
Да, спасибо. У меня были проблемы со сборкой проекта, открывалась не та форма, а выражение верное.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
15.09.2017, 22:04
Помогаю со студенческими работами здесь

Вычисление арифметического выражения
(ln(44.8)-sin(sqrt(x)))/2)-x помогите решить или направте на правильный путь решения...очень надо.. помогите пожалуйста

Вычисление арифметического выражения
2. Вычислить значение выражения (5684 / 4 + 357 / 3 + 245 / 5)*3. Полученный результат записать в регистр CX. Нужна помощь.

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

Вычисление арифметического выражения
составить программу для вычисления арифметического выражения при заданных данных x ,a и b. прошу помогите , горю на экзамене!

Вычисление арифметического выражения
Здравствуйте! Дано задание на вычисление арифметического выражения: a={10}^{5}*lg\mid 0,8x\mid *{e}^{\frac{{-x}^{2}}{2xy}} при...


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru