Fix Function

рдирдореНрдмрд░рдХреЛ рдЦрдгреНрдбрд┐рдХрд░рдг рдЧрд░реЗрдХреЛ рднрд╛рдЧ рд╣рдЯрд╛рдПрд░ рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐рдХреЛ рдЗрдиреНрдЯрд┐рдЬрд░ рдорд╛рди рдлрд░реНрдХрд╛рдЙрдБрдЫ ред

рд╡рд╛рдХреНрдп рд╕рдВрд░рдЪрдирд╛:

Fix (рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐)

рдорд╛рди рдлрд░реНрдХрд╛рдЙрдиреБрд╣реЛрд╕реН:

рдбрдмрд▓

рдкрд░рд╛рдорд┐рддрд┐рд╣рд░реВ:

рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐: рд╕рдЩреНрдЦреНрдпрд╛рддреНрдордХ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рдЬреБрди рддрдкрд╛рдИрдБ рдЗрдиреНрдЯрд┐рдЬрд░ рдорд╛рдирдХрд╛ рд▓рд╛рдЧрд┐ рдлрд░реНрдХрд╛рдЙрди рдЪрд╛рд╣рдиреБрд╣реБрдиреНрдЫ ред

рддреНрд░реБрдЯрд┐ рд╕рдЩреНрдХреЗрддрд╣рд░реВ

5 рдЕрд╡реИрдз рдХрд╛рд░реНрдп-рд╡рд┐рдзрд┐ рдХрд▓

рдЙрджрд╛рд╣рд░рдг:

Sub ExampleFix

    Print Fix(3.14159) ' рд▓реЗ рей рдлрд░реНрдХрд╛рдЙ рдЫ |

    Print Fix(0) ' рдлрд░реНрдХрд╛рдЙрдиреЗ реж рдореБрджреНрд░рдг рдЧрд░реНрдиреБрд╣реЛрд╕реНред

    Print Fix(-3.14159) ' рдлрд░реНрдХрд╛рдЙрдиреЗ -рей рдореБрджреНрд░рдг рдЧрд░реНрдиреБрд╣реЛрд╕реН

End Sub