IBM Lotus Symphony
|
Возвращает абсолютное значение числового выражения.
Abs (Число)
Двойной
Число: произвольное числовое выражение, для которого необходимо вернуть абсолютное значение. Порядок ввода значений не играет роли.
Коды ошибок
Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
siW1 = Int(InputBox$ ("Введите первое число","Ввод значения"))
siW2 = Int(InputBox$ ("Введите второе число","Ввод значения"))
Print "Расстояние:"; Abs(siW1 - siW2)
End Sub