Не могу написать программу(( - VB

Формулировка задачи:

Помогите, пожалуйста, написать программу в Visual Basic.. Даны три числа x,y,z. Вычислить p=max (x,y,z)...

Решение задачи: «Не могу написать программу((»

textual
                            Листинг программы 
                        

                            Private Sub Form_Load()
Dim x As Single, y As Single, z As Single
Dim max As Single
If x > y And x > z Then
    max = x
ElseIf y > x And y > z Then
    max = y
Else
    max = z
End If
End Sub
                        

Оцени полезность:

6 голосов , оценка 3.667 из 5

Похожие ответы