АА
Александр Андрусенко
Прикладное программирование
Visual Bacic
Написать функцию Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в переменную B - максимальное из этих значений.
Visual Bacic
Написать функцию Minmax(A,B), записывающую в переменную A минимальное из значений A и B, а в переменную B - максимальное из этих значений.
Sub Calculate(ByRef A As Double, ByRef B As Double)
' Если A > B, поменять их местами
If A >B Then
T=B
B=A
A=T
End IF
' В противном случае ничего не делать - и так все правильно
End Sub
Алексей, в твоем случае не предусмотрено, если переменные равны. . Реализация до студенческого уровня вполне годна