рджреЗрд░ рд╕реЗ рдЧрдгрдирд╛? рд╣рд╛рдБ рдЖрд╕рд╛рдиреА рд╕реЗ!

рдЬрд┐рди рд▓реЛрдЧреЛрдВ рдХреЛ рд╕реЗрд╡рд╛рдУрдВ рдХреА рддреБрд▓рдирд╛ рдореЗрдВ рдЕрдзрд┐рдХ рдЬрдЯрд┐рд▓ рдЧреНрд░рдВрдереЛрдВ рдХреА рд░рдЪрдирд╛ рдХрд░рдиреА рд╣реИ, рд╡реЗ рдЬрд╛рдирддреЗ рд╣реИрдВ рдХрд┐ рд▓реЗрдЯ рдЯреЗрдХ рдкрд░ рдПрдХ рд╕реБрд╡рд┐рдзрд╛рдЬрдирдХ рдРрдб-рдСрди рд╣реИ - рдлрд┐рд▓рд╣рд╛рд▓ рдпрд╣ рдХрд┐рд╕реА рднреА рдЬрдЯрд┐рд▓рддрд╛ рдХреЗ рдЧреБрдгрд╡рддреНрддрд╛ рд╡рд╛рд▓реЗ рдЧреНрд░рдВрдереЛрдВ рдХреЛ рдЬрд▓реНрджреА рд╕реЗ рдмрдирд╛рдиреЗ рдХрд╛ рд▓рдЧрднрдЧ рдПрдХрдорд╛рддреНрд░ рддрд░реАрдХрд╛ рд╣реИред рд▓реЗрдХрд┐рди рдПрдХ рднреА рдкрд╛рда рдореЗрдВ рдирд╣реАрдВ ... рд▓реЗрдЯрдЪ рдХрд╛ рдЙрдкрдпреЛрдЧ рдЕрдиреНрдп рдЙрджреНрджреЗрд╢реНрдпреЛрдВ рдХреЗ рд▓рд┐рдП рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИ, рдЬреЛ рдЯреЗрдХ рдХреЗ рдирд┐рд░реНрдорд╛рддрд╛, рдбреЛрдирд╛рд▓реНрдб рдиреБрде рдиреЗ рд╢рд╛рдпрдж рд╕реЛрдЪрд╛ рдирд╣реАрдВ рдерд╛ред
рдореИрдВрдиреЗ рдкрд╣рд▓реЗ рд╣реА рд▓рд┐рдЦрд╛ рдерд╛ рдХрд┐ рдкреНрд░рд╕реНрддреБрддрд┐ рдХреЛ рд▓реЗрдЯреЗрдХреНрд╕ рдХреИрд╕реЗ рдмрдирд╛рдпрд╛ рдЬрд╛рдПред рдЕрдм рдореИрдВ рдЗрд╕ рдмрд╛рд░реЗ рдореЗрдВ рдмрд╛рдд рдХрд░рдирд╛ рдЪрд╛рд╣рддрд╛ рд╣реВрдВ рдХрд┐ рдЖрдк рд▓реЗрдЯреЗрдХреНрд╕ рдХреА рддрд╛рдХрддреЛрдВ рджреНрд╡рд╛рд░рд╛ рд╕реАрдзреЗ рд╕рд░рд▓ рдЧрдгрдирд╛ рдХреИрд╕реЗ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред

рд╡рд┐рднрд┐рдиреНрди рд▓реЛрдЧреЛрдВ рджреНрд╡рд╛рд░рд╛ рд▓реЗрдЯреЗрдХреНрд╕ рдХреЗ рд▓рд┐рдП рдмрд╣реБрдд рд╕рд╛рд░реЗ рдЕрд▓рдЧ-рдЕрд▓рдЧ рдкреИрдХреЗрдЬ рд▓рд┐рдЦреЗ рдЧрдП рд╣реИрдВ, рдЗрд╕рдХреА рдХрд╛рд░реНрдпрдХреНрд╖рдорддрд╛ рдХрд╛ рд╡рд┐рд╕реНрддрд╛рд░ рдФрд░ рд▓реЗрдЖрдЙрдЯ рдбрд┐рдЬрд╛рдЗрдирд░ рдХреЗ рдХрд╛рдо рдХреЛ рд╕реБрд╡рд┐рдзрд╛рдЬрдирдХ рдмрдирд╛рдиреЗ рдХреЗ рд▓рд┐рдПред рд╕рдВрдЦреНрдпрд╛рддреНрдордХ рдбреЗрдЯрд╛ рдХреЗ рд╕рд╛рде рдХрд╛рдо рдХрд░рдиреЗ рдореЗрдВ рдорджрдж рдХрд░рдиреЗ рд╡рд╛рд▓реЗ рдЙрдкрдХрд░рдг рднреБрд▓рд╛рдП рдирд╣реАрдВ рдЬрд╛рддреЗ рд╣реИрдВред рдлреНрд▓реЛрдЯрд┐рдВрдЧ рдкреЙрдЗрдВрдЯ рдирдВрдмрд░реЛрдВ (рдПрдХрд▓ рдкрд░рд┐рд╢реБрджреНрдзрддрд╛) рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рд╕рд░рд▓ рдЧрдгрдирд╛ рд╕реАрдзреЗ рддрдХрдиреАрдХ рджреНрд╡рд╛рд░рд╛ рдХреА рдЬрд╛ рд╕рдХрддреА рд╣реИред рдпрд╣ рд╡рд╣реА рд╣реИ рдЬреЛ fp рдкреИрдХреЗрдЬ рдХреЗ рд▓рд┐рдП рд╣реИред рдореИрдВ рддреБрд░рдВрдд рдзреНрдпрд╛рди рджреЗрдирд╛ рдЪрд╛рд╣рддрд╛ рд╣реВрдВ рдХрд┐ рдмрд╛рд╣рд░реА рдЖрджреЗрд╢реЛрдВ рдХреЛ рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд░рдиреЗ рдХреА рд▓реЗрдЯрдЪ рдХреА рдХреНрд╖рдорддрд╛ рдХреЗ рдХрд╛рд░рдг, рдЖрдк рд╕рдВрдХрд▓рди рдЪрд░рдг рдкрд░ рдФрд░ рднреА рдЬрдЯрд┐рд▓ рдХрд╛рд░реНрдп рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ (рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП, рдСрдХреНрдЯреЗрд╡ рдореЗрдВ рдХреБрдЫ рдЧрдгрдирд╛ рдХрд░реЗрдВ, рдлрд┐рд░ рдореИрдердЬреАрдПрд▓ рдореЗрдВ рдЧреНрд░рд╛рдл рдмрдирд╛рдПрдВ рдФрд░ рдЙрдиреНрд╣реЗрдВ рдкрд╛рда рдореЗрдВ рдбрд╛рд▓реЗрдВ), рд▓реЗрдХрд┐рди рдореИрдВ рд╢рд╛рдпрдж рдЗрд╕ рдмрд╛рд░реЗ рдореЗрдВ рдмрд╛рдд рдХрд░ рд░рд╣рд╛ рд╣реВрдВ рдореИрдВ рдЖрдкрдХреЛ рджреВрд╕рд░реА рдмрд╛рд░ рдмрддрд╛рдКрдВрдЧрд╛ред
рдореИрдВ fp рдкреИрдХреЗрдЬ рдХреЗ рд▓рд┐рдП рдореИрдиреБрдЕрд▓ рдХреЛ рдХреЙрдкреА-рдкреЗрд╕реНрдЯ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рд╕реЗрдЯ рдирд╣реАрдВ рдХрд░рддрд╛ рд╣реВрдВ (рд╡рд┐рд╢реЗрд╖рдХрд░ рдЪреВрдВрдХрд┐ рдпрд╣ рдХрд╛рдлреА рдЫреЛрдЯрд╛ рд╣реИ), рд▓реЗрдХрд┐рди рдореИрдВ рдпрд╣ рдмрддрд╛рдирд╛ рдЪрд╛рд╣рддрд╛ рд╣реВрдВ рдХрд┐ рдореИрдВ рдЗрд╕ рдкреИрдХреЗрдЬ рдХрд╛ рдЙрдкрдпреЛрдЧ рд╕рднреА рдкреНрд░рдХрд╛рд░ рдХреЗ рддрдХрдиреАрдХреА рдХрд╛рд░реНрдпреЛрдВ, рд░рд┐рдкреЛрд░реНрдЯреЛрдВ рдЖрджрд┐ рдХреА рддреИрдпрд╛рд░реА рдореЗрдВ рд╕рд░рд▓ рдЧрдгрдирд╛ рдХреЗ рд▓рд┐рдП рдХреИрд╕реЗ рдХрд░рддрд╛ рд╣реВрдВред рдореИрдВ рдпрд╣ рднреА рджрд┐рдЦрд╛рддрд╛ рд╣реВрдВ рдХрд┐ "рд╕реНрдкреНрд░реЗрдбрд╢реАрдЯ" рдХреА рдкреНрд░рд╛рдердорд┐рдХ рдХрд╛рд░реНрдпрдХреНрд╖рдорддрд╛ рдХреЛ рд▓рд╛рдЧреВ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдЗрд╕рдХрд╛ рдЙрдкрдпреЛрдЧ рдХреИрд╕реЗ рдХрд░реЗрдВред
рд╕рдмрд╕реЗ рдкрд╣рд▓реЗ, рдПрдХ рдХрдорд╛рдВрдб рдмрдирд╛рдПрдВ рдЬреЛ рдЖрдкрдХреЛ рд╡рд┐рднрд┐рдиреНрди рдмрджрд▓рддреА рдЬрд╛рдирдХрд╛рд░реА (рдпрд╛рдиреА, рдХреБрдЫ рдкреИрд░рд╛рдореАрдЯрд░ рдЬреЛ рдЖрдк рдмрд╛рдж рдореЗрдВ рдмрджрд▓ рд╕рдХрддреЗ рд╣реИрдВ) рдХреЛ рд╕рдореНрдорд┐рд▓рд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ, рдЗрди рдЖрд╡реЗрд╖рдгреЛрдВ рдХреЛ рд▓рд╛рд▓ рдкреНрд░рд┐рдВрдЯ рдореЛрдб рдореЗрдВ рдПрдХ рд▓рд╛рд▓ рд╕реБрдкрд░рд╕реНрдХреНрд░рд┐рдкреНрдЯ рдФрд░ рд╕реАрдорд╛рдВрдд рдиреЛрдЯ рдХреЗ рд╕рд╛рде рдЪрд┐рд╣реНрдирд┐рдд рдХрд░реЗрдВред рджрд╕реНрддрд╛рд╡реЗрдЬрд╝ рдореЗрдВ рд░рдВрдЧ рдХреЛ colorx рдкреИрдХреЗрдЬ рджреНрд╡рд╛рд░рд╛ рдкреНрд░рджрд╛рди рдХрд┐рдпрд╛ рдЬрд╛рдПрдЧрд╛ред
рдпрд╣ рдЯреАрдо рддреАрди рддрд░реАрдХреЛрдВ рд╕реЗ рдХрд╛рдо рдХрд░реЗрдЧреА:рддреЛ рдпрд╣рд╛рдБ рдХреЛрдб рд╣реА рд╣реИ:

\newcounter{InsC@unt@r} \def\Ind@x{\stepcounter{InsC@unt@r}% \hbox to 0pt{\raisebox{1ex}{\tiny\red{\arabic{InsC@unt@r}}}}} \def\Insm@rgimp@r#1{\marginpar{\red{\tiny\arabic{InsC@unt@r}:#1}}} \ifx\TextOut\undefined \def\InsTxt@#1#2{#1\Ind@x\Insm@rgimp@r{#2}} \else \def\InsTxt@#1#2{#1} \fi \def\Ins{\futurelet\next\Ins@i} \def\Ins@i{\ifx\next\bgroup\expandafter\Ins@ii\else\expandafter\Ins@end\fi} \def\Ins@ii#1{\def\temp@rg{#1}\futurelet\next\Ins@iii} \def\Ins@iii{\ifx\next\bgroup\expandafter\Ins@two@rgs% \else\expandafter\Ins@one@rg\fi} \def\Ins@two@rgs#1{\InsWFP{\temp@rg}{#1}} %   \def\InsWFP#1#2{\expandafter\FPset\csname #1\endcsname{#2}\InsTxt@{#2}{#1}} \def\Ins@one@rg{\InsTxt@{\temp@rg}{}} %   \def\Ins@end{\red{\Square\Ind@x}\Insm@rgimp@r{?}\xspace} %   


рдореИрдВ рдЗрд╕реЗ рд╕рдордЭрд╛рдКрдВрдЧрд╛ред рд╕рдмрд╕реЗ рдкрд╣рд▓реЗ, рд╣рдо рдПрдХ рдирдП рдХрд╛рдЙрдВрдЯрд░ рдХреА рдШреЛрд╖рдгрд╛ рдХрд░рддреЗ рд╣реИрдВ рдЬрд┐рд╕реЗ рд╣рдо рдЗрдиреНрд╕рд░реНрдЯ рдЗрдВрдбреЗрдХреНрд╕ рдХреА рд╕рдВрдЦреНрдпрд╛ рдХреЗ рд▓рд┐рдП рдЙрдкрдпреЛрдЧ рдХрд░реЗрдВрдЧреЗред рдЕрдЧрд▓рд╛, рд╡рд┐рднрд┐рдиреНрди рд╕рд╣рд╛рдпрдХ рдХрдорд╛рдВрдб рдХреЛ рдореБрдЦреНрдп \Ins рдХрдорд╛рдВрдб рдХреЗ рд▓рд┐рдП рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд┐рдпрд╛ рдЧрдпрд╛ рд╣реИ, рдЬрд┐рд╕рдХреЗ рджреНрд╡рд╛рд░рд╛ рд╣рдо рдЕрдкрдиреЗ рдбреЗрдЯрд╛ рдХреЛ рдЯреЗрдХреНрд╕реНрдЯ рдореЗрдВ рд╕рдореНрдорд┐рд▓рд┐рдд рдХрд░реЗрдВрдЧреЗред
рдбреНрд░рд╛рдлреНрдЯ рдореЛрдб рдореЗрдВ рд╣рдорд╛рд░реЗ рдЖрд╡реЗрд╖рдг рдХреЛ рдЪрд┐рд╣реНрдирд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдХрдорд╛рдВрдб \Ind@x рдФрд░ \Insm@rgimp@r рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрддреА рд╣реИред рдкрд╣рд▓рд╛ рдХрдорд╛рдВрдб рд╕рдореНрдорд┐рд▓рди рдХрд╛рдЙрдВрдЯрд░ рдХреЛ рдмрдврд╝рд╛рддрд╛ рд╣реИ, рдПрдХ рдмреЙрдХреНрд╕ рдмрдирд╛рддрд╛ рд╣реИ рдЬреЛ рд╕реНрдерд╛рди рдирд╣реАрдВ рд▓реЗрддрд╛ рд╣реИ рдФрд░ рдЗрд╕рдореЗрдВ рд╕рдореНрдорд┐рд▓рди рд╕рдВрдЦреНрдпрд╛ рдХреЗ рд╕рд╛рде рдПрдХ рд▓рд╛рд▓ рд╕реБрдкрд░рд╕реНрдХреНрд░рд┐рдкреНрдЯ рджрд░реНрдЬ рдХрд░рддрд╛ рд╣реИред рджреВрд╕рд░реА рдХрдорд╛рдВрдб рдЦреЗрддреЛрдВ рдкрд░ рдПрдХ рдирд┐рд╢рд╛рди рд▓рдЧрд╛рддреА рд╣реИред рдбреНрд░рд╛рдлреНрдЯ рдореЛрдб рд╕реНрд╡рдпрдВ рд╣реА \TextOut рджреНрд╡рд╛рд░рд╛ рдирд┐рдпрдВрддреНрд░рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ: рдЕрдЧрд░ рд╣рдо рдЗрд╕реЗ ( \def\TextOut{} ) рдХреЛрдб рдХреЗ рдЗрд╕ рдЯреБрдХрдбрд╝реЗ рд╕реЗ рдкрд╣рд▓реЗ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рддреЗ рд╣реИрдВ, рддреЛ рд╡рд╣рд╛рдБ \def\InsTxt ("рд╡реНрд╣рд╛рдЗрдЯ" рд▓реЗрдЖрдЙрдЯ рдореЛрдб) рдкрд░ рдХреЛрдИ рдирд┐рд╢рд╛рди рдирд╣реАрдВ рд╣реЛрдЧрд╛, рдЕрдиреНрдпрдерд╛ рдЙрдиреНрд╣реЗрдВ рдиреАрдЪреЗ рд░рдЦрд╛ рдЬрд╛рдПрдЧрд╛ред
рдЕрдЧрд▓рд╛, рд╣рдо рдЕрдкрдиреЗ \Ins рдХрдорд╛рдВрдб рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рддреЗ рд╣реИрдВ, рдЬреЛ рдПрдХ рдЪрд░ рд╕рдВрдЦреНрдпрд╛ рдореЗрдВ рддрд░реНрдХ рд▓реЗрддрд╛ рд╣реИред рдпрд╣ рдХреЗрд╡рд▓ рдПрдХ рд╣реА рдЪреАрдЬрд╝ рдХрд░рддрд╛ рд╣реИ: рдпрд╣ рдЕрдЧрд▓реЗ рдЯреЛрдХрди ( \futurelet ) рдХреЛ \next рдореИрдХреНрд░реЛ рдореЗрдВ рдкрдврд╝рддрд╛ рд╣реИ, рдЗрд╕реЗ рд╡рд╛рдкрд╕ рдЫреЛрдбрд╝ рджреЗрддрд╛ рд╣реИ рдФрд░ \Ins@i рдХрдорд╛рдВрдб рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд░рддрд╛ рд╣реИред рдмрджрд▓реЗ рдореЗрдВ, рдпрд╣ рдЬрд╛рдВрдЪрддрд╛ рд╣реИ рдХрд┐ рдХрд┐рд╕ рдкреНрд░рдХрд╛рд░ рдХреЗ рдЯреЛрдХрди рдиреЗ рд╣рдорд╛рд░реЗ \Ins рдЕрдиреБрд╕рд░рдг рдХрд┐рдпрд╛ рд╣реИ: рдпрджрд┐ рдпрд╣ рдПрдХ рдУрдкрдирд┐рдВрдЧ рдХрд░реНрд▓реА рдмреНрд░реИрдХреЗрдЯ ( \bgroup ) рд╣реИ, рддреЛ рдЕрдЧрд▓реЗ рдкреИрд░рд╛рдореАрдЯрд░ рдХреЗ рдкреНрд░рд╛рд░рдВрднрд┐рдХ рд░реАрдбрд┐рдВрдЧ рдХреЗ рд╕рд╛рде \Ins@ii рдХрдорд╛рдВрдб рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ (рдЕрдиреНрдпрдерд╛ рдпрд╣ рдХрдорд╛рдВрдб рдирд╣реАрдВ рд╣реИ) рджреЗрдЦреЗрдВрдЧреЗ тАЭ)ред рдпрджрд┐ рдЯреЛрдХрди рдПрдХ рдмреНрд░реИрдХреЗрдЯ рдирд╣реАрдВ рд╣реИ, рддреЛ \Ins рдХрдорд╛рдВрдб рдореЗрдВ рдХреЛрдИ рддрд░реНрдХ рдирд╣реАрдВ рдерд╛ рдФрд░ рдЯреЗрдХреНрд╕реНрдЯ рдФрд░ рд╕реАрдорд╛рдВрдд рдиреЛрдЯ рдореЗрдВ рдПрдХ рдЦрд╛рд▓реА рдмреЙрдХреНрд╕ рд░рдЦрдХрд░ \Ins@end рдХреЛ рдХрд╣рд╛ рдЬрд╛рддрд╛ рд╣реИред
\Ins@ii рдХрдорд╛рдВрдб \Ins@ii рдХрдорд╛рдВрдб рдХреЗ рдкрд╣рд▓реЗ рддрд░реНрдХ рдХреЛ \temp@rg рдореИрдХреНрд░реЛ рдореЗрдВ рдбрд╛рд▓рддреА рд╣реИ рдФрд░ рдлрд┐рд░ рдирд┐рдореНрди рддрд░реНрдХ рдХреЗ рд▓рд┐рдП рдЬрд╛рдВрдЪ рдХрд░рддреА рд╣реИ ( \Ins@iii ): рдпрджрд┐ рдпрд╣ рдореМрдЬреВрдж рд╣реИ, рддреЛ рдЪрд░ рдХреЛ рдЖрд░рдВрдн рдХрд░рдиреЗ рдФрд░ рдЗрд╕рдХреЗ рдорд╛рди рдХреЛ рдбрд╛рд▓рдиреЗ рдХреЗ рд▓рд┐рдП \Ins@two@rgs рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИред рдФрд░ рдкрд╛рда рдореЗрдВ рдЯреИрдЧ; рдпрджрд┐ рдпрд╣ рдирд╣реАрдВ рд╣реИ, рддреЛ \Ins@one@rg рдХрдорд╛рдВрдб рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, рдЬреЛ рдХреЗрд╡рд▓ рдкрд╛рда рдореЗрдВ рдбреЗрдЯрд╛ рд╕рдореНрдорд┐рд▓рд┐рдд рдХрд░рддрд╛ рд╣реИ рдФрд░ рдПрдХ рдЪрд┐рд╣реНрди рдмрдирд╛рддрд╛ рд╣реИред
рдЧрдгрдирд╛ рдкрд░рд┐рдгрд╛рдореЛрдВ рдХреЗ рдЖрдЙрдЯрдкреБрдЯ рдХреЛ рд╕реБрд╡рд┐рдзрд╛рдЬрдирдХ рдмрдирд╛рдиреЗ рдХреЗ рд▓рд┐рдП, рд╣рдо \FPrint \FPprint , рдЬреЛ fp рдкреИрдХреЗрдЬ рд╕реЗ \FPprint рд▓рд┐рдЦрдиреЗ рдХреЗ рд╕рдорд╛рди рд╣реИ, рд▓реЗрдХрд┐рди рдХреБрдЫ рдФрд░ рдХрд░рдирд╛: рдЗрд╕рдХрд╛ рддрд░реНрдХ : , рдЬрд╣рд╛рдВ рдЧрдгрдирд╛ рдпрд╛ рдХрдорд╛рдВрдб рд╣реИ, рдФрд░ рджрд╢рдорд▓рд╡ рдмрд┐рдВрджреБ рдХреЗ рдмрд╛рдж рдЕрдВрдХреЛрдВ рдХреА рд╕рдВрдЦреНрдпрд╛ рд╣реИ, рдЗрд╕рд╕реЗ рдкрд╣рд▓реЗ рдЬрд┐рд╕рдХреЗ рдкрд░рд┐рдгрд╛рдо рдХреЛ рдЧреЛрд▓ рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реИред рдПрдХ рдЧреЛрд▓ рд╕рдВрдЦреНрдпрд╛ рдкреНрд░рджрд░реНрд╢рд┐рдд рдХреА рдЬрд╛рддреА рд╣реИред рдпрд╣рд╛рдВ рд╕рдм рдХреБрдЫ рдХрд╛рдлреА рд╕рд░рд▓ рд╣реИ, рдЗрд╕рд▓рд┐рдП рдореИрдВрдиреЗ рдмрд╣реБрдд рдЬреНрдпрд╛рджрд╛ рдЯрд┐рдкреНрдкрдгреА рдирд╣реАрдВ рдХреАред

 \def\FPrint#1{\@@print@@#1} \def\@@print@@#1:#2{\FPeval{\res@lt}{round(#1:#2)}\res@lt} 


рд╕рдВрдкреВрд░реНрдг рдкрд╛рда рдХреЗ рд▓рд┐рдП рдХреБрдЫ рдбреЗрдЯрд╛ рдХреЛ рд╕рдВрдЧреНрд░рд╣реАрдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП (рдХрд╣рддреЗ рд╣реИрдВ, рд╡рд╣ рдорд╛рди рдЬреЛ рджрд╕реНрддрд╛рд╡реЗрдЬрд╝ рдХреЗ рдХрдИ рдЦрдВрдбреЛрдВ рдореЗрдВ рдкрд░рд┐рдХрд▓рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, рдФрд░ рдХреБрдЫ рднрд╛рдЧ рдкреНрд░рддреНрдпреЗрдХ рдЕрдиреБрднрд╛рдЧ рдореЗрдВ рдкрд░рд┐рдХрд▓рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, рдФрд░ рд╣рдореЗрдВ рдкрд╛рда рдХреЗ рдЕрдВрдд рдореЗрдВ рд░рд╛рд╢рд┐ рдкреНрд░рджрд░реНрд╢рд┐рдд рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрддреА рд╣реИ), рд╣рдо \Ini рдХрдорд╛рдВрдб рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рддреЗ рд╣реИрдВ (рдкреНрд░рд╛рд░рдВрднрд┐рдХ рдПрдХ рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛ рдЪрд░, рдПрдХ рдЖрд╡рд╢реНрдпрдХ рддрд░реНрдХ рд╣реИ - рдЪрд░ рдХрд╛ рдирд╛рдо, рдФрд░ рдПрдХ рд╡реИрдХрд▓реНрдкрд┐рдХ - рд╡рд╣ рдорд╛рди рдЬрд┐рд╕рдХреЗ рджреНрд╡рд╛рд░рд╛ рдЪрд░ рдХреЛ рдкреНрд░рд╛рд░рдВрдн рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ), \Add (рдкрд╣рд▓реЗ рдкреИрд░рд╛рдореАрдЯрд░ рд╕реЗ рджреВрд╕рд░реЗ рдкреИрд░рд╛рдореАрдЯрд░ рд╕реЗ рдЪрд░ рдореЗрдВ рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рдЬреЛрдбрд╝рддрд╛ рд╣реИ), \Sub (рдЪрд░ рд╕реЗ рд╕рдВрдЦреНрдпрд╛ рдШрдЯрд╛рддрд╛ рд╣реИ) рдФрд░ \Show () рдкрд╛рда рдореЗрдВ рдЪрд░ рдкреНрд░рджрд░реНрд╢рд┐рдд рдХрд░рддрд╛ рд╣реИ, рджрд╢рдорд▓рд╡ рдмрд┐рдВрджреБ рдХреЗ рдмрд╛рдж рджреЛ рдЕрдВрдХреЛрдВ рддрдХ рдпрд╛ рд╡реИрдХрд▓реНрдкрд┐рдХ рдкреИрд░рд╛рдореАрдЯрд░ рдореЗрдВ рдирд┐рд░реНрджрд┐рд╖реНрдЯ рдЕрдВрдХреЛрдВ рдХреА рд╕рдВрдЦреНрдпрд╛ рддрдХ)ред

 \newcommand{\Ini}[2][0]{\expandafter\gdef\csname cntr#2\endcsname{#1}} \def\Add#1#2{\expandafter\FPeval\csname cntr#1\endcsname{cntr#1+(#2)}} \def\Sub#1#2{\expandafter\FPeval\csname cntr#1\endcsname{cntr#1-(#2)}} \newcommand{\Show}[2][2]{\FPrint{cntr#2:#1}} 


рдЗрд╕ рддрдереНрдп рдХреЗ рдХрд╛рд░рдг рдХрд┐ рдЙрдкрд╕рд░реНрдЧ cntr рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛-рдкрд░рд┐рднрд╛рд╖рд┐рдд рдЪрд░ рдирд╛рдо рдореЗрдВ рдЬреЛрдбрд╝рд╛ рдЬрд╛рддрд╛ рд╣реИ, рдЧрд▓рддреА рд╕реЗ рдХрд┐рд╕реА рд▓реЗрдЯреЗрдХреНрд╕ рдореИрдХреНрд░реЛрдЬрд╝ рдХреЛ рдУрд╡рд░рд░рд╛рдЗрдб рдХрд░рдиреЗ рдХреА рд╕рдВрднрд╛рд╡рдирд╛ рд▓рдЧрднрдЧ рдЧрд╛рдпрдм рд╣реЛ рдЬрд╛рддреА рд╣реИред
рдЕрдЧрд▓рд╛, "рд╕реНрдкреНрд░реЗрдбрд╢реАрдЯ" рдкрд░ рдЪрд▓рддреЗ рд╣реИрдВред рд╢реБрд░реВ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рд╣рдо рд╕реНрд╡рдЪрд╛рд▓рд┐рдд рдирдВрдмрд░рд┐рдВрдЧ рд╢реБрд░реВ рдХрд░реЗрдВрдЧреЗ:

 \newcount\@row@num\@row@num=15 \def\@@nonum{} \def\@shownum{\ifx\@@nonum\empty\global\advance\@row@num1 \the\@row@num\else \gdef\@@nonum{}\fi} \def\NumIni{\global\@row@num=0\gdef\@@nonum{1}} \def\NoNum{\gdef\@@nonum{1}} \newcolumntype{N}[1]{>{\strut}#1<{\@shownum}} 


рдХрд╛рдЙрдВрдЯрд░ рдХреА рд╢реБрд░реБрдЖрдд рдореИрдиреНрдпреБрдЕрд▓ рд░реВрдк рд╕реЗ рдХреА рдЬрд╛рдиреА рдЪрд╛рд╣рд┐рдП, рддрд╛рд▓рд┐рдХрд╛ рдХреА рд╢реБрд░реБрдЖрдд рдореЗрдВ \NumIni рдХрдорд╛рдВрдб \NumIni рдЪрд╛рд╣рд┐рдП (рдпрд╛ рдХреБрдЫ рдФрд░ рдЬреИрд╕реЗ рдХрд┐ рд╣рд░ рдкреЗрдЬ рдХреЗ рд╕рд╛рде рдЖрддреЗ рд╣реИрдВ, рд▓реЗрдХрд┐рди рдЯреЗрдмрд▓ рдХреЗ рд▓рд┐рдП)ред рд╕рд░рдгреА рдкреИрдХреЗрдЬ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ, рд╣рдо рд╡рд╛рдВрдЫрд┐рдд рдХреЙрд▓рдо рдХреЗ рдкреНрд░рддреНрдпреЗрдХ рд╕реЗрд▓ рдХреЗ рд▓рд┐рдП рдирд┐рд░реНрдзрд╛рд░рд┐рдд рдХрдорд╛рдВрдб рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд░реЗрдВрдЧреЗред рдПрдХ рд╣реА рдкреИрдХреЗрдЬ рдЖрдкрдХреЛ рдирдП рдкреНрд░рдХрд╛рд░ рдХреЗ рд╕реНрддрдВрднреЛрдВ рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ: рддрд╛рд▓рд┐рдХрд╛ рдХрд╛ рд╡рд╣ рдХреЙрд▓рдо рдЬрд┐рд╕рдореЗрдВ рд╣рдо рдСрдЯреЛ-рдирдВрдмрд░ рдбрд╛рд▓рдирд╛ рдЪрд╛рд╣рддреЗ рд╣реИрдВ, рдХреЛ рдЯрд╛рдЗрдк рдПрди рдХреЗ рд╕рд╛рде рдЪрд┐рд╣реНрдирд┐рдд рдХрд░рдирд╛ рд╣реЛрдЧрд╛ ред рдЕрдЧрд░ рд╣рдореЗрдВ рдХрд┐рд╕реА рд╕реЗрд▓ рдореЗрдВ рдирдВрдмрд░ рдбрд╛рд▓рдиреЗ рдХреА рдЬрд░реВрд░рдд рдирд╣реАрдВ рд╣реИ, рддреЛ рд╣рдо рдЗрд╕реЗ \NoNum рдореИрдХреНрд░реЛ рдХреЗ рд╕рд╛рде рдЪрд┐рд╣реНрдирд┐рдд рдХрд░реЗрдВрдЧреЗред
рдЕрдм рдЖрдЗрдП рд╕рдВрдЦреНрдпрд╛рддреНрдордХ рдкреНрд░рдХрд╛рд░реЛрдВ рдХреЗ рд╕рд╛рде рдЬреЛрдбрд╝, рдШрдЯрд╛рд╡, рдЧреБрдгрд╛, рдФрд░ рд╡рд┐рднрд╛рдЬрди рдХреА рдЕрдиреБрдорддрд┐ рджреЗрдиреЗ рд╡рд╛рд▓реЗ рд╕реНрддрдВрднреЛрдВ рдХреЗ рдкреНрд░рдХрд╛рд░реЛрдВ рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░реЗрдВред рдЪреВрдБрдХрд┐ рдЗрди рд╕рднреА рдХрдорд╛рдВрдбреЛрдВ рдХрд╛ рдХреЛрдб рд▓рдЧрднрдЧ рдПрдХ рдЬреИрд╕рд╛ рд╣реИ (рд╕рд┐рд░реНрдлрд╝ \FPeval рдореЗрдВ рдХрд┐рдП рдЧрдП рдЕрдВрдХрдЧрдгрд┐рддреАрдп рдСрдкрд░реЗрд╢рди рдХреЛ рдЫреЛрдбрд╝рдХрд░), рд╣рдо рдкрд╣рд▓реЗ рдПрдХ рдореИрдХреНрд░реЛ рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░реЗрдВрдЧреЗ рдЬреЛ рдирдП рдХрдорд╛рдВрдб рдХреА рдкрд░рд┐рднрд╛рд╖рд╛ рдХреЛ рдЖрд╕рд╛рди рдмрдирд╛рддрд╛ рд╣реИред
рдореИрдВ рдкрд╣рд▓реЗ рд╣реА рдЪреЗрддрд╛рд╡рдиреА рджреВрдВрдЧрд╛: рддрд╛рд▓рд┐рдХрд╛ рд╕реЗрд▓ рдореЗрдВ рд╕рдВрдЦреНрдпрд╛ рдХреЗ рдЕрдВрдд рдХреЛ рд╕реНрдкрд╖реНрдЯ рд░реВрдк рд╕реЗ рдирд┐рд░реНрдзрд╛рд░рд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рдореБрдЭреЗ рдЗрд╕реЗ рдЪрд░рд┐рддреНрд░ рджреНрд╡рд╛рд░рд╛ рд╕реНрдХреИрди рдХрд░рдирд╛ рд╣реЛрдЧрд╛ (рдЬреЛ рдкрд╛рда рдХреЗ рд╕рдВрдХрд▓рди рд╕рдордп рдХреЛ рдмрд╣реБрдд рдмрдврд╝рд╛ рджреЗрдЧрд╛), рдореИрдВ рджреВрд╕рд░реЗ рд░рд╛рд╕реНрддреЗ рдкрд░ рдЪрд▓рд╛ рдЧрдпрд╛ред рдкреНрд░рддреНрдпреЗрдХ рд╕реЗрд▓ рдХреЗ рдЕрдВрдд рдореЗрдВ, рдПрдореНрдкрд░рд╕реЗрдВрдб рд╕рд╛рдЗрди рд╕реЗ рдкрд╣рд▓реЗ рдПрдХ рд╕реНрдерд╛рди рдбрд╛рд▓рд╛ рдЬрд╛рдирд╛ рдЪрд╛рд╣рд┐рдП, рдЬреЛ рд╕реНрдкрд╖реНрдЯ рд░реВрдк рд╕реЗ рд╕реЗрд▓ рдХреЗ рдЕрдВрджрд░ рдбреЗрдЯрд╛ рдХреЗ рдЕрдВрдд рдХрд╛ рдкреНрд░рддреАрдХ рд╣реИред рдпрджрд┐ рдЖрдк рдЗрд╕ рдЕрдВрддрд░ рдХреЛ рднреВрд▓ рдЬрд╛рддреЗ рд╣реИрдВ, рддреЛ "рдЕрдЬреАрдм рддреНрд░реБрдЯрд┐рдпрд╛рдВ" рджрд┐рдЦрд╛рдИ рджреЗ рд╕рдХрддреА рд╣реИрдВред
рдореИрдВ рдирд┐рдореНрдирд▓рд┐рдЦрд┐рдд рдореИрдХреНрд░реЛ рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рд╡рд┐рд╕реНрддрд╛рд░ рд╕реЗ рдирд╣реАрдВ рдмрддрд╛рдКрдВрдЧрд╛, рдореИрдВ рдЦреБрдж рдХреЛ рдПрдХ рд╕рддрд╣реА рд╡рд┐рд╡рд░рдг рддрдХ рд╕реАрдорд┐рдд рдХрд░реВрдВрдЧрд╛ред рдХрдорд╛рдВрдб \@@def@cmd рдЖрдкрдХреЛ рдПрдХ рдирдП рдореИрдХреНрд░реЛ (рдЬрд┐рд╕рдХрд╛ рдирд╛рдо рдкрд╣рд▓реЗ рдкреИрд░рд╛рдореАрдЯрд░ рдореЗрдВ рдирд┐рд░реНрджрд┐рд╖реНрдЯ рдХрд┐рдпрд╛ рдЧрдпрд╛ рд╣реИ) рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ рдЬреЛ рджреВрд╕рд░реЗ рдкреИрд░рд╛рдореАрдЯрд░ рд╕реЗ рдЕрдВрдХрдЧрдгрд┐рдд рдХрд░рддрд╛ рд╣реИ, рдФрд░ рдПрдХ рдирдП рдкреНрд░рдХрд╛рд░ рдХрд╛ рдЯреЗрдмрд▓ рдХреЙрд▓рдо (рддреАрд╕рд░рд╛ рдкреИрд░рд╛рдореАрдЯрд░) рднреА рдмрдирд╛рддрд╛ рд╣реИред рдЪреВрдБрдХрд┐ рдЗрд╕ рдХрдорд╛рдВрдб рдХрд╛ рдЙрдкрдпреЛрдЧ рдЕрдиреНрдп рдХрдорд╛рдВрдбреНрд╕ рдХреЛ рдЗрдирд┐рд╢рд┐рдпрд▓рд╛рдЗрдЬрд╝ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, рдФрд░ рдпрд╣рд╛рдВ рддрдХ тАЛтАЛрдХрд┐ рдкреИрд░рд╛рдореАрдЯрд░ рд╕реЗ рдирд╛рдо рд╕реЗ рдПрдХ рдирдИ рдХрдорд╛рдВрдб рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рддрд╛ рд╣реИ, рдЬреИрд╕реЗ рдХрд┐ \expandafter (рдЕрдЧрд▓реЗ рдЯреЛрдХрди рдХреЗ рдорд╛рдзреНрдпрдо рд╕реЗ \xdef рддрдХ рдЕрдЧрд▓реЗ рдЯреЛрдХрди рдХреЗ рд╡рд┐рд╕реНрддрд╛рд░ рдХреЛ рджрдмрд╛рдиреЗ) рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИ, \xdef (рдпрд╣ \xdef рд╕рдорд╛рди рд╣реИ) \global\edef рдФрд░ рдПрдХ рдирдП рдореИрдХреНрд░реЛ рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░рддрд╛ рд╣реИ, рдкрд╣рд▓реЗ рдЙрд╕рдХреЗ рд╢рд░реАрд░ рд╕реЗ рдореИрдХреНрд░реЛрдЬрд╝ рдкреНрд░рдХрдЯ рдХрд░рддрд╛ рд╣реИ), \noexpand (рдЯреЛрдХрди рдХреЛ "рдкрд╣рд▓реЗ рдкрдврд╝рдиреЗ рдореЗрдВ \noexpand рдХрд░рдиреЗ рдХрд╛ рдирд┐рд╖реЗрдз"), \csname (рдореИрдХреНрд░реЛ рдирд╛рдо рдкрд░ рдкрд╛рда рдкрд░рд┐рд╡рд░реНрддрд┐рдд рдХрд░рдирд╛)ред

 \def\@@def@cmd#1#2#3{% \expandafter\xdef\csname #1\endcsname##1\ignorespaces{% \xdef\noexpand\@fst@rg{##1}\futurelet\noexpand\next\expandafter\noexpand\csname @@#1@\endcsname} \expandafter\xdef\csname @@#1@\endcsname{% \noexpand\ifx\noexpand\next\unskip\relax \noexpand\else\noexpand\expandafter\expandafter\noexpand\csname @testminus@#1\endcsname\noexpand\fi} \expandafter\xdef\csname @testminus@#1\endcsname{% \noexpand\ifx\noexpand\next-\noexpand\expandafter\expandafter\noexpand \csname @@m@#1\endcsname\noexpand\else \noexpand\expandafter\expandafter\noexpand \csname @@@#1\endcsname\noexpand\fi} \expandafter\xdef\csname @@@#1\endcsname##1 {% \noexpand\ifnum1=1##1{}\noexpand\else##1 \noexpand#2{##1}\noexpand\fi} \expandafter\xdef\csname @@m@#1\endcsname##1 {##1 \noexpand#2{##1}} \newcolumntype{#3}[2]{>{\csname #1\endcsname{##1}}##2} } 


рдЕрдм рдЬрдм рд╣рдордиреЗ рдЧрдВрджрд╛ рдХрд╛рдо рдХрд░ рд▓рд┐рдпрд╛ рд╣реИ, рд╣рдо рдмреБрдирд┐рдпрд╛рджреА рдЖрдЬреНрдЮрд╛рдУрдВ рдХреЛ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ:

 \def\@SET#1{\expandafter\xdef\csname cntr\@fst@rg\endcsname{#1}} \def\@ADD#1{\FPeval{\res@lt}{cntr\@fst@rg+(#1)}\@SET{\res@lt}} \def\@SUB#1{\FPeval{\res@lt}{cntr\@fst@rg-(#1)}\@SET{\res@lt}} \def\@MUL#1{\FPeval{\res@lt}{cntr\@fst@rg*(#1)}\@SET{\res@lt}} \def\@DIV#1{\FPeval{\res@lt}{cntr\@fst@rg/(#1)}\@SET{\res@lt}} \@@def@cmd{TAdd}{\@ADD}{+} \@@def@cmd{TSub}{\@SUB}{-} \@@def@cmd{TMul}{\@MUL}{*} \@@def@cmd{TDiv}{\@DIV}{/} \@@def@cmd{TSet}{\@SET}{X} 


рдЕрдм рд╣рдорд╛рд░реЗ рдкрд╛рд╕ рдирд┐рдореНрдирд▓рд┐рдЦрд┐рдд рдирдП рд╕реНрддрдВрдн рдкреНрд░рдХрд╛рд░ рд╣реИрдВ рдЬреЛ рджреЛ рддрд░реНрдХ рд▓реЗрддреЗ рд╣реИрдВ (рдЪрд░ рдирд╛рдо рдФрд░ рдорд╛рдирдХ рд╕реЗрд▓ рд╕рдВрд░реЗрдЦрдг рдкреНрд░рдХрд╛рд░)ред рдкреНрд░рдХрд╛рд░ + , - , * рдФрд░ / рдФрд░ рд╕реЗрд▓ рдкреНрд░рдХрд╛рд░ рдХреЗ рдкрд╣рд▓реЗ рддрд░реНрдХ рд╕реЗ рдЪрд░ рдХреЗ рдмреАрдЪ рд╕рдВрдмрдВрдзрд┐рдд рд╕рдВрдЪрд╛рд▓рди рдФрд░ рд╕реЗрд▓ рдореЗрдВ рдирд┐рд╣рд┐рдд рд╕рдВрдЦреНрдпрд╛ред рдкреНрд░рдХрд╛рд░ X рд╕реЗрд▓ рдореЗрдВ рдирд┐рд╣рд┐рдд рдорд╛рди рдХреЛ рдЪрд░ рд╕реЗрдЯ рдХрд░рддрд╛ рд╣реИред рдпрджрд┐ рд╕реНрддрдВрдн X рдХреЗ рд╕рд╛рде рдкреНрд░рд╛рд░рдВрдн рдХрд┐рдП рдмрд┐рдирд╛ рдЪрд░ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд┐рдпрд╛ рдЬрд╛рдирд╛ рдЪрд╛рд╣рд┐рдП, рддреЛ рдЗрд╕реЗ рддрд╛рд▓рд┐рдХрд╛ рд╕реЗ рдкрд╣рд▓реЗ \Ini рдХрдорд╛рдВрдб рдХреЗ рд╕рд╛рде рдЖрд░рдВрдн рдХрд┐рдпрд╛ рдЬрд╛рдирд╛ рдЪрд╛рд╣рд┐рдПред рд╕реЗрд▓ рдХреА рд╕рд╛рдордЧреНрд░реА рдХреА рдЬрд╛рдБрдЪ рдХреА рдЬрд╛рддреА рд╣реИ: рдпрджрд┐ рдХреЛрдИ рд╕рдВрдЦреНрдпрд╛ рдирд╣реАрдВ рд╣реИ, рддреЛ рдХрд╛рд░реНрд░рд╡рд╛рдИ рдирд╣реАрдВ рдХреА рдЬрд╛рддреА рд╣реИред
рдЕрдм рдпрд╣ рд╣рдорд╛рд░реЗ рд▓рд┐рдП рдПрдХ рдФрд░ рдкреНрд░рдХрд╛рд░ рдХрд╛ рд╕реНрддрдВрдн рдШреЛрд╖рд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдмрдирд╛ рд╣реБрдЖ рд╣реИ, рдЬреЛ рд╣рдореЗрдВ рдЧрдгрдирд╛ рдХреЗ рдкрд░рд┐рдгрд╛рдо (рдФрд░ рдпрджрд┐ рдЖрд╡рд╢реНрдпрдХ рд╣реЛ, рддреЛ рдЙрдирдХреА рд░рд╛рд╢рд┐ рдХреА рдЧрдгрдирд╛ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП) рдкреНрд░рджрд░реНрд╢рд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрдЧрд╛ред

 \def\@@plus#1#2{\gdef\@fst@rg{#1}\@ADD{cntr#2}} \def\@Sho@@#1{\ifx\@@nonum\empty\@@plus{#1}{\temp@rg}\else\gdef\@@nonum{}\fi} \def\@Sh@{\ifx\next\bgroup\expandafter\@Sho@@\else\gdef\@@nonum{}\fi} \def\Sho#1{\ifx\@@nonum\empty\Show{#1}\fi\def\temp@rg{#1}\futurelet\next\@Sh@} \newcolumntype{S}[3]{>{\strut}#3<{\Sho{#1}{#2}}} 


рд╣рдо рдПрдХ рдирдпрд╛ рд╕реНрддрдВрдн рдкреНрд░рдХрд╛рд░ рдмрдирд╛рддреЗ рд╣реИрдВ - рдПрд╕ , рдЬрд┐рд╕рдореЗрдВ рддреАрди рдкреИрд░рд╛рдореАрдЯрд░ рд╣реИрдВ: рдкреНрд░рджрд░реНрд╢рд┐рдд рдЪрд░ рдХрд╛ рдирд╛рдо, рд╕рдВрдЪрд╛рдпрдХ рдЪрд░ рдХрд╛ рдирд╛рдо рдФрд░ рд╕рдВрд░реЗрдЦрдг рдкреНрд░рдХрд╛рд░ред рдпрд╣ рдЖрджреЗрд╢ рднреА \NoNum ред \Sho рдХрдорд╛рдВрдб рдЬреЛ S рдЯрд╛рдЗрдк рдХрд░рддрд╛ рд╣реИ, рдЙрд╕реЗ рдЕрдкрдиреЗ рдЖрдк рдХреНрд░рд┐рдпрд╛рдиреНрд╡рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред рдЗрд╕ рдорд╛рдорд▓реЗ рдореЗрдВ, рдпрджрд┐ рд╣рдореЗрдВ рдХреБрдЫ рдЪрд░ рдореЗрдВ рдкрд░рд┐рдгрд╛рдо рдЬрдорд╛ рдХрд░рдиреЗ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рдирд╣реАрдВ рд╣реИ, рддреЛ рд╣рдо рдЗрд╕ рдЖрджреЗрд╢ рдХреЛ рдХреЗрд╡рд▓ рдПрдХ рддрд░реНрдХ рджреЗрддреЗ рд╣реИрдВред
рдФрд░ рдЕрдВрдд рдореЗрдВ, рдереЛрдбрд╝рд╛ рдордиреЛрд░рдВрдЬрдиред рд╣рдо рдЬрдЯрд┐рд▓ рд╕рд╢рд░реНрдд рдирд┐рд░реНрджреЗрд╢реЛрдВ рдХреЛ рд▓рд╛рдЧреВ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП ifthen рдкреИрдХреЗрдЬ рд╕реЗ рдХрдиреЗрдХреНрдЯ рдХрд░реЗрдВрдЧреЗ (рдиреЗрд╕реНрдЯреЗрдб рдЕрдЧрд░ рдЙрдиреНрд╣реЗрдВ рдЕрдиреБрдорддрд┐ рдирд╣реАрдВ рджреЗрддрд╛ рд╣реИ) рдФрд░ рдЫреЛрд░реЛрдВ рдФрд░ рд╕реНрдЯреИрдХ рдХреЗ рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди рдХреЛ рдмрдирд╛рддреЗ рд╣реИрдВред
рд▓реВрдк рдХреЗ рд▓рд┐рдП рд╕рдмрд╕реЗ рд╕рд░рд▓ (рдмрд┐рдирд╛ рдиреЗрд╕реНрдЯ рд╡рд╛рд▓реЗ) рдЗрд╕ рддрд░рд╣ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИ:

 \newcounter{f@rc@unter} \newcommand{\forplus}[4][1]{% \setcounter{f@rc@unter}{#2}\ifthenelse{\value{f@rc@unter} < #3}{#4% \addtocounter{f@rc@unter}{#1}% \forplus[#1]{\value{f@rc@unter}}{#3}{#4}}{}} \newcommand{\forminus}[4][-1]{% \setcounter{f@rc@unter}{#2}\ifthenelse{\value{f@rc@unter} > #3}{#4% \addtocounter{f@rc@unter}{#1}% \forminus[#1]{\value{f@rc@unter}}{#3}{#4}}{}} \def\iterator{\arabic{f@rc@unter}} \def\Loop#1#2{\forplus{0}{#1}{#2}} 


рдпрд╣рд╛рдВ рдЪрд╛рд░ рдЖрджреЗрд╢ рд▓рд╛рдЧреВ рдХрд┐рдП рдЧрдП рд╣реИрдВред \forplus рдЖрдкрдХреЛ рдкрд╣рд▓реЗ рдкреИрд░рд╛рдореАрдЯрд░ рдореЗрдВ рдирд┐рд░реНрджрд┐рд╖реНрдЯ рд╕рдВрдЦреНрдпрд╛ рд╕реЗ рджреВрд╕рд░реЗ рдореЗрдВ рд╕рдВрдЦреНрдпрд╛ рддрдХ рд╡реГрджреНрдзрд┐ рдХреЗ рд╕рд╛рде рд▓реВрдк рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ, рд╣рд░ рдмрд╛рд░ рддреАрд╕рд░реЗ рдкреИрд░рд╛рдореАрдЯрд░ рдХреА рд╕рд╛рдордЧреНрд░реА рдХреЛ рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд░рддрд╛ рд╣реИред рдПрдХ рд╡реИрдХрд▓реНрдкрд┐рдХ рдореИрдХреНрд░реЛ рддрд░реНрдХ рдПрдХ рд▓реВрдк рд╕реНрдЯреЗрдк рд╣реИред \forminus рдПрдХ \forminus рд▓реВрдк рд▓рд╛рдЧреВ рдХрд░рддрд╛ рд╣реИред \iterator рдЖрдкрдХреЛ рд▓реВрдк рдкреБрдирд░рд╛рд╡реГрддреНрддрд┐ рдХреА рд╕рд╛рдордЧреНрд░реА, рдФрд░ \Loop рдХреЛ рдкреНрд░рджрд░реНрд╢рд┐рдд рдХрд░рдиреЗ рдХреА рдЕрдиреБрдорддрд┐ рджреЗрддрд╛ рд╣реИ - рджреВрд╕рд░реЗ рддрд░реНрдХ рдХреА рд╕рд╛рдордЧреНрд░реА рдХреЛ рдирд┐рд╖реНрдкрд╛рджрд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдПрди рдмрд╛рд░ (рдЬрд╣рд╛рдВ рдПрди рдкрд╣рд▓рд╛ рддрд░реНрдХ рд╣реИ)ред
рд╕реНрдЯреИрдХ рдХреЗ рд╕рд╛рде рдХрд╛рдо рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, рд╣рдо рдХрдорд╛рдВрдб \push рдФрд░ \pop , рд╕рд╛рде рд╣реА \stacklen (рд╕реНрдЯреИрдХ рдореЗрдВ рддрддреНрд╡реЛрдВ рдХреА рд╕рдВрдЦреНрдпрд╛), \popall (рд╕реНрдЯреИрдХ рдХреА рд╕рдВрдкреВрд░реНрдг рд╕рд╛рдордЧреНрд░реА рдХрд╛ рдЙрддреНрдкрд╛рджрди) рдФрд░ \popalldel (рдПрдХ рд╕реАрдорд╛рдВрдХрдХ рдХреЗ рд╕рд╛рде рдЖрдЙрдЯрдкреБрдЯ рд╕рд╛рдордЧреНрд░реА) рдХреЛ \popalldel ред

 \newcount\@buflen\@buflen=0 \newtoks\@@stack \@@stack={\empty} \def\push#1{\advance\@buflen1\begingroup\toks0={{#1}}% \edef\act{\endgroup\global\@@stack={\the\toks0 \the\@@stack}}\act} \def\pop{\ifnum\@buflen>0\advance\@buflen-1\fi\begingroup% \edef\act{\endgroup\noexpand\splitList\the\@@stack(tail)\@@stack}\act} \def\splitList#1#2(tail)#3{\ifx#1\empty\red{ !}\else{#1}\global#3={#2}\fi} \def\stacklen{\the\@buflen\xspace} \def\popalldel#1{\ifthenelse{\the\@buflen > 1}{\pop#1\popalldel{#1}}% {\ifnum\@buflen=1\pop\fi}} \def\popall{\popalldel{}} 


рд╕реНрдЯреИрдХ рдХреЛ рдПрдХ рд╕рд╛рдзрд╛рд░рдг рдЯреЛрдХрди рд╕реВрдЪреА рдХреЗ рдорд╛рдзреНрдпрдо рд╕реЗ рдХрд╛рд░реНрдпрд╛рдиреНрд╡рд┐рдд рдХрд┐рдпрд╛ рдЬрд╛рддрд╛ рд╣реИред рдЗрд╕реЗ рд╕реНрдЯреИрдХ рдкрд░ рд░рдЦрдирд╛ рдмрд╕ рд╕реВрдЪреА рдХреЗ рд╢реАрд░реНрд╖ рдкрд░ рдПрдХ рдирдпрд╛ рдЯреЛрдХрди рдЬреЛрдбрд╝рддрд╛ рд╣реИ, рдФрд░ рд╕реНрдЯреИрдХ рд╕реЗ рдЪрдпрди рдХрд░рдХреЗ рд╕реВрдЪреА рдХреЛ рдкрд╣рд▓реЗ рдЯреЛрдХрди рд╕реЗ рд╡рд┐рднрд╛рдЬрд┐рдд рдХрд░рддрд╛ рд╣реИ рдФрд░ рдЗрд╕реЗ рд╡рд╛рдкрд╕ рдХрд░рддрд╛ рд╣реИред


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

рддрд╛рд▓рд┐рдХрд╛рдУрдВ рдХреЗ рд╕рд╛рде рдХрд╛рдо рдХрд░рдиреЗ рдХрд╛ рдПрдХ рдЙрджрд╛рд╣рд░рдг:

 \Ini[1]{yy} \Ini{zz} \begin{table}[!th] \begin{tabular}{|N{c}|X{xx}{c}|*{xx}{c}|S{xx}{zz}{c}|*{yy}{c}|} \hline \bf \NumIni \No{} / & A & B & A$\cdot$B\NoNum& C \\ \hline & -3.5 & 4.4 &&43.3 \\ & 31.31 &200.21 &&3 \\ & 1.23 &3.33 &&1.2 \\ \hline \NoNum&&&\NoNum $\sum(A\cdot B)=\,$\Show{zz}&$\prod C=\,$\Show{yy} \\ \hline \end{tabular} \end{table} 




рдкреНрд░рд╛рд░рдВрднрд┐рдХ рдЪрд░ рдФрд░ рдЧрдгрдирд╛ рдХреЗ рд╕рд╛рде рдХрд╛рдо рдХрд░рдиреЗ рдХрд╛ рдПрдХ рдЙрджрд╛рд╣рд░рдг:

 \Ini{totalmass}    {\tt totalmass}      -,          .          . ,    -,  \Ins{m1p}{45.1},\FPeval{m1}{3*m1p}      : $m_1=3\cdot\FPrint{m1p:1}=\FPrint{m1:1}$.     .\Add{totalmass}{m1} : {\tt totalmass}$\,=\Show[1]{totalmass}$. ,      , , , \Ins{moreaddtoa}{3.45},     ,     . : {\tt totalmass}$\,\Add{totalmass}{moreaddtoa}=\Show[2]{totalmass}$.      -.   -  $\rho=\,$\Ins{therho}{5.43},    $V=\,$\Ins{theV}{12.44},    \FPeval{mi}{therho*theV}$m_i=\rho\cdot V=\FPrint{mi:3}$.      .\Add{totalmass}{mi}   : {\tt totalmass}$\,=\Show[3]{totalmass}$.  \verb'\Ini', \verb'\Show'  \verb'\FPrint'    .  \verb'\Ins'     {\tt fp}    :  -   ,  "--- - ,       \verb'\global'  ,   ,     . 




рд▓реВрдк рдФрд░ рд╕реНрдЯреИрдХ рдХреЗ рд╕рд╛рде рдХрд╛рдо рдХрд░рдиреЗ рдХрд╛ рдЙрджрд╛рд╣рд░рдг:

     a=\Ins{a}{2.5}, b=\Ins{b}{3},     $c=\sqrt{a^2+b^2}=\FPrint{root(2, (a^2 + b^2)):2}$   1  4: \forplus{1}{5}{\iterator~}   1  10   3: \forplus[3]{1}{11}{\iterator~}   4  1: \forminus{4}{0}{\iterator~}   10  1   -3: \forminus[-3]{10}{0}{\iterator~} \Loop5{ ! } \push{}\push{}\push{}\push{}    : \popalldel{, }. : \stacklen . 




рдирдореВрдирд╛ рдкрд╛рда
рдкрд░рд┐рдгрд╛рдореА рдкреАрдбреАрдПрдл

Source: https://habr.com/ru/post/In146742/


All Articles