LibreOffice 7.5 Help
рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐рдХреЛ рдирд┐рд╢реНрдЪрд┐рдд рдорд╛рди рдлрд░реНрдХрд╛рдЙрдБрдЫ ред
Abs (рдирдореНрдмрд░)
Double
рдирдореНрдмрд░: рдХреБрдиреИ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рдЬрд╕рд▓рд╛рдИ рддрдкрд╛рдИрдБ рдирд┐рд╢реНрдЪрд┐рдд рдорд╛рдирдХрд╛ рд▓рд╛рдЧрд┐ рдлрд░реНрдХрд╛рдЙрди рдЪрд╛рд╣рдиреБрд╣реБрдиреНрдЫ ред реж рд╕рд╣рд┐рдд рдзрдирд╛рддреНрдордХ рдирдореНрдмрд░рд╣рд░реВ рдкрд░рд┐рд╡рд░реНрддрди рдирднрдЗ рдлрд░реНрдХрдиреНрдЫ, рдЬрд╣рд╛рдБ рдЛрдгрд╛рддреНрдордХ рдирдореНрдмрд░рд╣рд░реВ рдзрдирд╛рддреНрдордХ рдирдореНрдмрд░рд╣рд░реВрдорд╛ рд░реВрдкрд╛рдиреНрддрд░рдг рд╣реБрдиреНрдЫрдиреН ред
рджрд┐рдПрдХрд╛ рдЙрджрд╛рд╣рд░рдгрд╣рд░реВ рджреБрдИ рдорд╛рдирд╣рд░реВрдХреЛ рдмреАрдЪрдорд╛ рдлрд░рдХ рдЧрдгрдирд╛ рдЧрд░реНрдирд▓рд╛рдИ Abs рдкреНрд░рдХрд╛рд░реНрдпрд╣рд░реВрдХреЛ рдкреНрд░рдпреЛрдЧ рдЧрд░реНрджрдЫ ред рдпреЛ рд╡рд╛рд╕реНрддрд╛ рдЧрд░реНрджреИрди рдХрд┐ рддрдкрд╛рдИрдБрд▓реЗ рдХреБрди рдорд╛рди рдкрд╣рд┐рд▓реЗ рдкреНрд░рд╡рд┐рд╖реНрдЯ рдЧрд░реНрдиреБрднрдпреЛ ред
Sub ExampleDifference
Dim siW1 As Single
Dim siW2 As Single
siW1 = Int(рдЖрдЧрдд рдмрд╛рдХрд╕$ ("рдкрд╣рд┐рд▓реЛ рдорд╛рддреНрд░рд╛ рдкреНрд░рд╡рд┐рд╖реНрдЯ рдЧрд░реНрдиреБрд╣реЛрд╕реН ","рдЖрдЧрдд рдорд╛рди"))
siW2 = Int(рдЖрдЧрдд рдмрд╛рдХрд╕$ ("рджреЛрд╕реНрд░реЛ рдорд╛рддреНрд░рд╛ рдкреНрд░рд╡рд┐рд╖реНрдЯ рдЧрд░реНрдиреБрд╣реЛрд╕реН","рдЖрдЧрдд рдорд╛рди"))
"рдлрд░рдХ "; Abs(siW1 - siW2) рдореБрджреНрд░рдг рдЧрд░реНрдиреБрд╣реЛрд╕реН
End Sub