LibreOffice 25.2 abi
Tagastab arvavaldise absoluutvÀÀrtuse.
Abs (arv)
Double
Arv: suvaline arvavaldis, mille absoluutvÀrtust soovid leida. Positiivsed arvud, kaasa arvatud 0, tagastatakse muutmata kujul, negatiivsed arvud teisendatakse positiivseteks.
JÀrgmises nÀites kasutatakse funktsiooni Abs kahe vÀÀrtuse vahelise erinevuse arvutamiseks. Pole oluline, kumma vÀÀrtuse sisestad esimesena.
Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
siW1 = Int(InputBox$ ("Palun sisesta esimene kogus","VÀÀrtuse sisestus"))
siW2 = Int(InputBox$ ("Palun sisesta teine kogus","VÀÀrtuse sisestus"))
Print "Erinevus on "; Abs(siW1 - siW2)
End Sub