Даны 3 числа.Вывести наибольшее из них - VB
Формулировка задачи:
Помогите со следующей задачей:
Написать программу к следующей задаче: "Даны 3 числа.Вывести наибольшее из них".
Программный код нужен.
Решение задачи: «Даны 3 числа.Вывести наибольшее из них»
textual
Листинг программы
Dim arr(1 To 3) as double, i as integer, max as double For i = 1 To 3 arr(i) = inputbox("BBEDITE EL-T " & i) Next max = arr(1) For i = 2 To 3 If arr(i)>max Then max = arr(i) Next MsgBox "Max = " & max
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д