![]() |
Модераторы: diadiavova, gambit |
![]() ![]() ![]() |
|
Alfis |
|
|||
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 14.12.2008 Репутация: нет Всего: нет |
скачал готовую программу в интернете написанной в бейсике для решения квадратного уравнения:
Private Sub Command1_Click() Dim a, b, c, D, x1, x2 As Double a = (Text1.Text) b = (Text2.Text) c = (Text3.Text) D = b * b - 4 * a * c If D = 0 Then x1 = -b / (2 * a) x2 = x1 Text4.Text = "x1 = " + Conversion.CStr(x1) + ", x2 = " + Conversion.CStr(x2) End If If D < 0 Then Text4.Text = "Уравнение не имеет корня" End If If D > 0 Then x1 = (-b + Sqr(D)) / (2 * a) x2 = (-b - Sqr(D)) / (2 * a) Text4.Text = "x1 = " + Conversion.CStr(x1) + ", x2 = " + Conversion.CStr(x2) End If End Sub программа работает но я немогу понять что выполняет функция + Conversion.CStr(x1) +. Обьясните пожалуста. |
|||
|
||||
diadiavova |
|
|||
![]() Доктор Зло(диагност, настоящий, с лицензией и полномочиями) ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 5821 Регистрация: 14.8.2008 Где: В Коньфпольте Репутация: 8 Всего: 142 |
Конвертирует число в строку.
-------------------- Хочешь получить мудрый совет - читай подписи участников форумов. Злой доктор Щасзаболит ![]() |
|||
|
||||
![]() ![]() ![]() |
Правила форума VB .NET | |
|
Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, diadiavova. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | VB .NET | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |