![]() |
![]() ![]() v.5.2011.12.30 |
Будь хитрее всех, используй хитрые инструменты! |
|
Visual Basic 5.0/6.0 - Простые математические операцииВсе примеры / Числа, математика, финансы / Простые математические операцииВычисление квадратного корня
Автор: Петр (Skript) Пономарев | добавлено: 06.03.2010, 13:25 | просмотров: 6299 (1+) | комментариев: 0 | рейтинг:
Программа вычисляет квадратный корень.
![]() КодOption Explicit Dim z As Integer Dim s As Single Private Sub Command1_Click() CurrentY = 1400 z = InputBox(Введите целое положительное число"; _ "запрос числа") While z < 568 s = Sqr(z) CurrentX = 568 Print "Корень квадратный из числа"; z: _ "равен"; s z = InputBox("Введите целое положительное число", _ "запрос числа") Wend CurrentX = 568 Label1.Caption = "Спасибо" End Sub
Язык Visual Basic 6.0 является устаревшим. Многие примеры, размещенные на нашем сайте, были созданы еще во времена Windows 98 и могут не работать в современных операционных системах. Если у вас возникнут какие-либо проблемы или вопросы, вы можете обратиться за помощью на наш форум.
Добавлять комментарии могут только зарегистрированные пользователи сайта. Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации ![]() Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь. Нет комментариев... |
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
|
|