рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛

(рдирд┐рдпрдиреНрддреНрд░рдг рдХрд╛рд░реНрдбрд╣рд░реВ)
(рд░рд╛рд╕рд╛рдпрдирд┐рдХ рддрддреНрд╡рд╣рд░реВрдХреЛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛рдХреЛ рдЕрдиреНрддрд░реНрд░рд╛рд╖реНрдЯреНрд░рд┐рдп рд╡рд░реНрд╖рд▓рд╛рдИ рд╕рдорд░реНрдкрд┐рдд)
(рднрд░реНрдЦрд░рдХреЛ рдердкрд╣рд░реВ рдЕрдкреНрд░рд┐рд▓ 8, 2019 рдорд╛ рдЧрд░рд┐рдПрдХреЛ рдерд┐рдпреЛред рдердкрд╣рд░реВрдХреЛ рд╕реВрдЪреА рддреБрд░реБрдиреНрддреИ рдХрд╛рдЯрд┐рдПрдХреЛ рддрд▓ рдЫ)

рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛
(рдореЗрдиреНрдбреЗрд▓рд┐рднрдХреЛ рдлреВрд▓, рд╕реНрд░реЛрдд)

рдорд▓рд╛рдИ рдпрд╛рдж рдЫ рд╣рд╛рдореАрд▓реЗ рдмрддрдЦ рдкрд╛рд░ рдЧрд░реНрдпреМрдВред рдпреА рддреАрдирд╡рдЯрд╛ рдкрд╛рдард╣рд░реВ рдПрдХреИрдЪреЛрдЯрд┐ рдерд┐рдП: рднреВрдЧреЛрд▓, рдкреНрд░рд╛рдХреГрддрд┐рдХ рд╡рд┐рдЬреНрдЮрд╛рди рд░ рд░реВрд╕реАред рд╡рд┐рдЬреНрдЮрд╛рди рдкрд╛рдардорд╛, рд╣рд╛рдБрд╕рд▓рд╛рдИ рд╣рд╛рдБрд╕рдХреЛ рд░реВрдкрдорд╛ рдЕрдзреНрдпрдпрди рдЧрд░рд┐рдПрдХреЛ рдерд┐рдпреЛ, рдпрд╕рдХрд╛ рдкрдЦреЗрдЯрд╛рд╣рд░реВ рдХреЗ-рдХрд╕реНрддрд╛ рд╣реБрдиреНрдЫрдиреН, рдХрд╕реНрддрд╛ рдЦреБрдЯреНрдЯрд╛рд╣рд░реВ рд╣реБрдиреНрдЫрдиреН, рдпреЛ рдХрд╕рд░реА рдкреМрдбрд┐рдиреНрдЫ, рдЖрджрд┐ред рднреВрдЧреЛрд▓ рдкрд╛рдардорд╛, рдПрдЙрдЯреИ рдмрддрдЦрд▓рд╛рдИ рд╡рд┐рд╢реНрд╡рдХреЛ рдмрд╛рд╕рд┐рдиреНрджрд╛рдХреЛ рд░реВрдкрдорд╛ рдЕрдзреНрдпрдпрди рдЧрд░рд┐рдПрдХреЛ рдерд┐рдпреЛ: рдпреЛ рдирдХреНрд╕рд╛рдорд╛ рджреЗрдЦрд╛рдЙрди рдЖрд╡рд╢реНрдпрдХ рдерд┐рдпреЛ рдЬрд╣рд╛рдБ рдпреЛ рдмрд╕реНрдЫ рд░ рдХрд╣рд╛рдБ рдЫреИрдиред рд░реВрд╕реА рднрд╛рд╖рд╛рдорд╛, рд╕реЗрд░рд╛рдлрд┐рдорд╛ рдкреЗрдЯреНрд░реЛрднрдирд╛рд▓реЗ рд╣рд╛рдореАрд▓рд╛рдИ "u-t-k-a" рд▓реЗрдЦреНрди рд░ рдмреНрд░реЗрдордмрд╛рдЯ рд╣рд╛рдБрд╕рд╣рд░реВрдХреЛ рдмрд╛рд░реЗрдорд╛ рдХреЗрд╣реА рдкрдвреНрди рд╕рд┐рдХрд╛рдЙрдиреБрднрдпреЛред рдЕрдиреНрддрдорд╛, рдЙрдирд▓реЗ рд╣рд╛рдореАрд▓рд╛рдИ рдЬрд╛рдирдХрд╛рд░реА рджрд┐рдП рдХрд┐ рдЬрд░реНрдорди рдмрддрдЦрдорд╛ рдпрд╕реНрддреЛ рдЫ, рд░ рдлреНрд░рд╛рдиреНрд╕реЗрд▓реАрдорд╛ рдпрд╕реНрддреЛред рдорд▓рд╛рдИ рд▓рд╛рдЧреНрдЫ рдХрд┐ рддреНрдпрд╕рдмреЗрд▓рд╛ рдпрд╕рд▓рд╛рдИ "рдЬрдЯрд┐рд▓ рд╡рд┐рдзрд┐" рднрдирд┐рдиреНрдереНрдпреЛред рд╕рд╛рдорд╛рдиреНрдпрддрдпрд╛, рд╕рдмреИ рдХреБрд░рд╛ "рдЙрддреНрддрд░рдорд╛" рдмрд╛рд╣рд┐рд░ рдЖрдпреЛред

Veniamin Kaverin, рджреБрдИ рдХрдкреНрддрд╛рди

рдорд╛рдерд┐рдХреЛ рдЙрджреНрдзрд░рдгрдорд╛, рднреЗрдирд┐рдпрд╛рдорд┐рди рдХрд╛рднреЗрд░рд┐рдирд▓реЗ рдЬрдЯрд┐рд▓ рд╢рд┐рдХреНрд╖рдг рд╡рд┐рдзрд┐рдХрд╛ рдХрдордЬреЛрд░реАрд╣рд░реВрд▓рд╛рдИ рдХреБрд╢рд▓рддрд╛рдкреВрд░реНрд╡рдХ рджреЗрдЦрд╛рдП, рддрдерд╛рдкрд┐, рдХреЗрд╣реА (рд╕рд╛рдпрдж рдзреЗрд░реИ рджреБрд░реНрд▓рдн) рдЕрд╡рд╕реНрдерд╛рдорд╛, рдпрд╕ рд╡рд┐рдзрд┐рдХрд╛ рддрддреНрд╡рд╣рд░реВ рдЬрд╛рдпрдЬ рдЫрдиреНред рдпрд╕реНрддреИ рдПрдЙрдЯрд╛ рдХреЗрд╕ рдбрд┐рдЖрдИ рдореЗрдиреНрдбреЗрд▓рд┐рднрдХреЛ рд╕реНрдХреВрд▓ рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рди рдкрд╛рдард╣рд░реВрдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛ рд╣реЛред рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛рдХреЛ рд╕рд╛рде рд╡рд┐рд╢рд┐рд╖реНрдЯ рдХрд╛рд░реНрдпрд╣рд░реВрдХреЛ рд╕рдлреНрдЯрд╡реЗрдпрд░ рд╕реНрд╡рдЪрд╛рд▓рдирдХреЛ рдХрд╛рд░реНрдп рд░рд╕рд╛рдпрдирд╢рд╛рд╕реНрддреНрд░ рдЕрдзреНрдпрдпрди рдЧрд░реНрди рдерд╛рд▓реЗрдХрд╛ рд╕реНрдХреВрд▓рдХрд╛ рдмрд╛рд▓рдмрд╛рд▓рд┐рдХрд╛рд╣рд░реВрдХреЛ рд▓рд╛рдЧрд┐ рд╕реНрдкрд╖реНрдЯ рдЫ, рд░ рдзреЗрд░реИ рд╡рд┐рд╢рд┐рд╖реНрдЯ рд░рд╛рд╕рд╛рдпрдирд┐рдХ рд╕рдорд╕реНрдпрд╛рд╣рд░реВрдорд╛ рд╡рд┐рднрд╛рдЬрд┐рдд рдЫред рдПрдХреИ рд╕рдордпрдорд╛, рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдХреЛ рдврд╛рдБрдЪрд╛ рднрд┐рддреНрд░, рдпреЛ рдХрд╛рд░реНрдпрд▓реЗ рд╣рд╛рдореАрд▓рд╛рдИ рдирд┐рдпрдиреНрддреНрд░рдг рдХрд╛рд░реНрдбрд╣рд░реВрдХреЛ рд╡рд┐рдзрд┐рд▓рд╛рдИ рд╕рд░рд▓ рд░реВрдкрдорд╛ рдкреНрд░рджрд░реНрд╢рди рдЧрд░реНрди рдЕрдиреБрдорддрд┐ рджрд┐рдиреНрдЫ, рдЬреБрди рдЧреНрд░рд╛рдлрд┐рдХрд▓ рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩрд▓рд╛рдИ рд╢реНрд░реЗрдп рджрд┐рди рд╕рдХрд┐рдиреНрдЫ, рдЧреНрд░рд╛рдлрд┐рдХ рддрддреНрд╡рд╣рд░реВ рдкреНрд░рдпреЛрдЧ рдЧрд░реЗрд░ рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩрдХреЛ рд░реВрдкрдорд╛ рд╢рдмреНрджрдХреЛ рд╡реНрдпрд╛рдкрдХ рдЕрд░реНрдердорд╛ рдмреБрдЭрд┐рдиреНрдЫред

(рдЕрдкреНрд░рд┐рд▓ рео, реирежрезреп рдердк рдЧрд░рд┐рдПрдХреЛ:
рдкрд░рд┐рд╢рд┐рд╖реНрдЯ 1: рдХрд╕рд░реА рд░рд╕рд╛рдпрди рд╡рд┐рдЬреНрдЮрд╛рди рдХреНрдпрд╛рд▓реНрдХреБрд▓реЗрдЯрд░ рдХрд╛рдо рдЧрд░реНрджрдЫ
рдкрд░рд┐рд╢рд┐рд╖реНрдЯ реи: рдлрд┐рд▓реНрдЯрд░рдХрд╛ рд▓рд╛рдЧрд┐ рдХрд╛рд░реНрдпрд╣рд░реВрдХреЛ рдЙрджрд╛рд╣рд░рдгрд╣рд░реВ)

рдЖрдзрд╛рд░рднреВрдд рдХрд╛рд░реНрдпрдХреЛ рд╕рд╛рде рд╕реБрд░реБ рдЧрд░реМрдВред рд╕рд╛рдзрд╛рд░рдг рдЕрд╡рд╕реНрдерд╛рдорд╛, рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛ рд╕реНрдХреНрд░рд┐рдирдорд╛ рд╡рд┐рдиреНрдбреЛ рдлрд╛рд░рдордорд╛ рдкреНрд░рджрд░реНрд╢рд┐рдд рд╣реБрдиреБрдкрд░реНрдЫ, рдЬрд╣рд╛рдБ рдкреНрд░рддреНрдпреЗрдХ рдХрдХреНрд╖рдорд╛ рддрддреНрд╡рдХреЛ рд░рд╛рд╕рд╛рдпрдирд┐рдХ рдкрджрдирд╛рдо рд╣реБрдиреЗрдЫ: H - рд╣рд╛рдЗрдбреНрд░реЛрдЬрди, He - рд╣реАрд▓рд┐рдпрдо, рдЖрджрд┐ред рдпрджрд┐ рдорд╛рдЙрд╕ рдХрд░реНрд╕рд░рд▓реЗ рд╕реЗрд▓рд▓рд╛рдИ рдкреЛрдЗрдиреНрдЯ рдЧрд░реНрдЫ рднрдиреЗ, рддрддреНрд╡рдХреЛ рдкрджрдирд╛рдо рд░ рдпрд╕рдХреЛ рд╕рдВрдЦреНрдпрд╛ рд╣рд╛рдореНрд░реЛ рдлрд╛рд░рдордорд╛ рд╡рд┐рд╢реЗрд╖ рдХреНрд╖реЗрддреНрд░рдорд╛ рдкреНрд░рджрд░реНрд╢рд┐рдд рд╣реБрдиреНрдЫред рдпрджрд┐ рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓реЗ LMB рдерд┐рдЪреНрдпреЛ рднрдиреЗ, рддреНрдпрд╕рдкрдЫрд┐ рдпреЛ рдЪрдпрди рдЧрд░рд┐рдПрдХреЛ рддрддреНрд╡рдХреЛ рдкрджрдирд╛рдо рд░ рд╕рдВрдЦреНрдпрд╛ рдлрд╛рд░рдордХреЛ рдЕрд░реНрдХреЛ рдХреНрд╖реЗрддреНрд░рдорд╛ рд╕рдВрдХреЗрдд рдЧрд░рд┐рдиреЗрдЫред

рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛

рдХреБрдиреИ рдкрдирд┐ рд╡рд┐рд╢реНрд╡рд╡реНрдпрд╛рдкреА рднрд╛рд╖рд╛ рдкреНрд░рдпреЛрдЧ рдЧрд░реЗрд░ рд╕рдорд╕реНрдпрд╛ рд╕рдорд╛рдзрд╛рди рдЧрд░реНрди рд╕рдХрд┐рдиреНрдЫред рд╣рд╛рдореА рд╕рд╛рдзрд╛рд░рдг рдкреБрд░рд╛рдиреЛ Delpi-7 рд▓рд┐рдиреЗрдЫреМрдВ, рдЬреБрди рд▓рдЧрднрдЧ рд╕рдмреИрд▓рд╛рдИ рдмреБрдЭреНрди рд╕рдХрд┐рдиреНрдЫред рддрд░ PL рдорд╛ рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩ рдЧрд░реНрдиреБ рдЕрдШрд┐, рдлреЛрдЯреЛрд╢рдкрдорд╛, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рджреБрдИ рдЪрд┐рддреНрд░рд╣рд░реВ рдХреЛрд░реМрдВред рдкрд╣рд┐рд▓реЗ, рдХрд╛рд░реНрдпрдХреНрд░рдордорд╛ рд╣рд╛рдореАрд▓реЗ рд╣реЗрд░реНрди рдЪрд╛рд╣реЗрдХреЛ рдврд╛рдБрдЪрд╛рдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛ рдХреЛрд░реМрдВред рдирддрд┐рдЬрд╛рд▓рд╛рдИ рдЧреНрд░рд╛рдлрд┐рдХ рдлрд╛рдЗрд▓рдорд╛ рд╕реЗрдн рдЧрд░реНрдиреБрд╣реЛрд╕реН table01.bmp.

рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛

рджреЛрд╕реНрд░реЛ рд░реЗрдЦрд╛рдЪрд┐рддреНрд░рдХреЛ рд▓рд╛рдЧрд┐ рд╣рд╛рдореА рдкрд╣рд┐рд▓реЛ рдкреНрд░рдпреЛрдЧ рдЧрд░реНрдЫреМрдВред рд╣рд╛рдореА рдХреНрд░рдорд╢рдГ RGB рд░рдЩ рдореЛрдбреЗрд▓рдорд╛ рдЕрджреНрд╡рд┐рддреАрдп рд░рдЩрд╣рд░реВ рд╕рд╣рд┐рдд, рд╕рдмреИ рдЧреНрд░рд╛рдлрд┐рдХреНрд╕рд╣рд░реВ рдЦрд╛рд▓реА рдЧрд░реА рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рд╣рд░реВ рднрд░реНрдиреЗрдЫреМрдВред R рд░ G рд╕рдзреИрдВ 0, рд░ B=1 рд╣рд╛рдЗрдбреНрд░реЛрдЬрдирдХреЛ рд▓рд╛рдЧрд┐, 2 рд╣рд┐рд▓рд┐рдпрдордХреЛ рд▓рд╛рдЧрд┐, рдЖрджрд┐ рд╣реБрдиреЗрдЫред рдпреЛ рд░реЗрдЦрд╛рдЪрд┐рддреНрд░ рд╣рд╛рдореНрд░реЛ рдирд┐рдпрдиреНрддреНрд░рдг рдХрд╛рд░реНрдб рд╣реБрдиреЗрдЫ, рдЬрд╕рд▓рд╛рдИ рд╣рд╛рдореАрд▓реЗ рдлрд╛рдЗрд▓рдорд╛ рдмрдЪрдд рдЧрд░реНрдиреЗрдЫреМрдВред table2.bmp.

рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛

рдлреЛрдЯреЛрд╢рдкрдорд╛ рдЧреНрд░рд╛рдлрд┐рдХ рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩрдХреЛ рдкрд╣рд┐рд▓реЛ рдЪрд░рдг рдкреВрд░рд╛ рднрдпреЛред Delpi-7 IDE рдорд╛ рдЧреНрд░рд╛рдлрд┐рдХрд▓ GUI рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩрдорд╛ рдЬрд╛рдФрдВред рдпреЛ рдЧрд░реНрдирдХреЛ рд▓рд╛рдЧрд┐, рдирдпрд╛рдБ рдкрд░рд┐рдпреЛрдЬрдирд╛ рдЦреЛрд▓реНрдиреБрд╣реЛрд╕реН, рдЬрд╣рд╛рдБ рд╣рд╛рдореА рдореБрдЦреНрдп рдлрд╛рд░рдордорд╛ рд╕рдВрд╡рд╛рдж рдмрдЯрди рд░рд╛рдЦреНрдЫреМрдВ (tableDlg), рдЬрд╕рдорд╛ рддрд╛рд▓рд┐рдХрд╛ рд╕рдВрдЧ рдХрд╛рдо рд╣реБрдиреЗрдЫред рдЕрд░реНрдХреЛ рд╣рд╛рдореА рдлрд╛рд░рдо рд╕рдВрдЧ рдХрд╛рдо рдЧрд░реНрдЫреМрдВ tableDlg.

рдлрд╛рд░рдордорд╛ рдХреНрд▓рд╛рд╕ рдХрдореНрдкреЛрдиреЗрдиреНрдЯ рд░рд╛рдЦреНрдиреБрд╣реЛрд╕реН рддрд╕реНрдмрд┐рд░... рд╣рд╛рдореАрд▓реЗ рдкрд╛рдпреМ Image1ред рдиреЛрдЯ рдЧрд░реНрдиреБрд╣реЛрд╕реН рдХрд┐ рд╕рд╛рдорд╛рдиреНрдпрддрдпрд╛, рдареВрд▓рд╛ рдкрд░рд┐рдпреЛрдЬрдирд╛рд╣рд░реВрдХреЛ рд▓рд╛рдЧрд┐, рдлрд╛рд░рдордХреЛ рд╕реНрд╡рдЪрд╛рд▓рд┐рдд рдирд╛рдорд╣рд░реВ рдЙрддреНрдкрдиреНрди рд╣реБрдиреНрдЫ рдЫрд╡рд┐ рдПрдирдХрд╣рд╛рдБ N рдзреЗрд░реИ рджрд░реНрдЬрди рд╡рд╛ рдмрдвреА рдкреБрдЧреНрди рд╕рдХреНрдЫ - рдпреЛ рдЙрддреНрддрдо рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩ рд╢реИрд▓реА рд╣реЛрдЗрди, рд░ рдердк рдЕрд░реНрдердкреВрд░реНрдг рдирд╛рдорд╣рд░реВ рджрд┐рдиреБ рдкрд░реНрдЫред рддрд░ рд╣рд╛рдореНрд░реЛ рд╕рд╛рдиреЛ рдкрд░рд┐рдпреЛрдЬрдирд╛рдорд╛, рдХрд╣рд╛рдБ N 2 рднрдиреНрджрд╛ рдмрдврд┐ рд╣реБрдиреЗ рдЫреИрди, рддрдкрд╛рдИрд▓реЗ рдпрд╕рд▓рд╛рдИ рдЙрддреНрдкрдиреНрди рдЧрд░реЗрдХреЛ рд░реВрдкрдорд╛ рдЫреЛрдбреНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫред

рд╕рдореНрдкрддреНрддрд┐ рдХреЛ рдЫрд╡рд┐ рез.рдЪрд┐рддреНрд░ рдлрд╛рдЗрд▓ рдЕрдкрд▓реЛрдб рдЧрд░реНрдиреБрд╣реЛрд╕реН table01.bmpред рд╣рд╛рдореА рд╕рд┐рд░реНрдЬрдирд╛ рдЧрд░реНрдЫреМрдВ Image2 рд░ рддреНрдпрд╣рд╛рдБ рд╣рд╛рдореНрд░реЛ рдирд┐рдпрдиреНрддреНрд░рдг рдХрд╛рд░реНрдб рд▓реЛрдб рдЧрд░реНрдиреБрд╣реЛрд╕реН table2.bmpред рдпрд╕ рдЕрд╡рд╕реНрдерд╛рдорд╛, рд╣рд╛рдореА рдлрд╛рдИрд▓рд▓рд╛рдИ рд╕рд╛рдиреЛ рд░ рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓рд╛рдИ рдЕрджреГрд╢реНрдп рдмрдирд╛рдЙрдБрдЫреМрдВ, рдЬрд╕реНрддреИ рдлрд╛рд░рдордХреЛ рддрд▓реНрд▓реЛ рдмрд╛рдпрд╛рдБ рдХреБрдирд╛рдорд╛ рджреЗрдЦрд╛рдЗрдПрдХреЛ рдЫред рд╣рд╛рдореА рдЕрддрд┐рд░рд┐рдХреНрдд рдирд┐рдпрдиреНрддреНрд░рдг рддрддреНрд╡рд╣рд░реВ рдердкреНрдЫреМрдВ, рдЬрд╕рдХреЛ рдЙрджреНрджреЗрд╢реНрдп рд╕реНрдкрд╖реНрдЯ рдЫред Delpi-7 IDE рдорд╛ рдЧреНрд░рд╛рдлрд┐рдХрд▓ GUI рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩрдХреЛ рджреЛрд╕реНрд░реЛ рдЪрд░рдг рдкреВрд░рд╛ рднрдпреЛред

рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛

рддреЗрд╕реНрд░реЛ рдЪрд░рдгрдорд╛ рдЬрд╛рдФрдВ - Delpi-7 IDE рдорд╛ рдХреЛрдб рд▓реЗрдЦреНрдиреЗред рдореЛрдбреНрдпреБрд▓рд▓реЗ рдХреЗрд╡рд▓ рдкрд╛рдБрдЪ рдШрдЯрдирд╛ рд╣реНрдпрд╛рдиреНрдбрд▓рд░рд╣рд░реВ рд╕рдорд╛рд╡реЗрд╢ рдЧрд░реНрджрдЫ: рдлрд╛рд░рдо рд╕рд┐рд░реНрдЬрдирд╛ (FormCreate), рдХрд░реНрд╕рд░ рдЖрдиреНрджреЛрд▓рди Image1 (Image1MouseMove), рд╕реЗрд▓рдорд╛ LMB рдХреНрд▓рд┐рдХ рдЧрд░реНрджреИ (рдЫрд╡рд┐ 1 рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реН) рд░ рдареАрдХ рдмрдЯрдирд╣рд░реВ рдкреНрд░рдпреЛрдЧ рдЧрд░реЗрд░ рд╕рдВрд╡рд╛рджрдмрд╛рдЯ рдмрд╛рд╣рд┐рд░ рдирд┐рд╕реНрдХрдиреБрд╣реЛрд╕реН (OKBtnрдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реН) рд╡рд╛ рд░рджреНрдж рдЧрд░реНрдиреБрд╣реЛрд╕реН (рд░рджреНрдж рдЧрд░реНрдиреБрд╣реЛрд╕реНBtnрдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реН)ред рдпреА рд╣реНрдпрд╛рдиреНрдбрд▓рд░рд╣рд░реВрдХреЛ рд╣реЗрдбрд░рд╣рд░реВ IDE рдкреНрд░рдпреЛрдЧ рдЧрд░реЗрд░ рдорд╛рдирдХ рддрд░рд┐рдХрд╛рдорд╛ рдЙрддреНрдкрдиреНрди рд╣реБрдиреНрдЫрдиреНред

рдореЛрдбреНрдпреБрд▓ рд╕реНрд░реЛрдд рдХреЛрдб:

unit tableUnit;
// ╨Я╨╡╤А╨╕╨╛╨┤╨╕╤З╨╡╤Б╨║╨░╤П ╤В╨░╨▒╨╗╨╕╤Ж╨░ ╤Е╨╕╨╝╨╕╤З╨╡╤Б╨║╨╕╤Е ╤Н╨╗╨╡╨╝╨╡╨╜╤В╨╛╨▓ ╨Ф.╨Ш.╨Ь╨╡╨╜╨┤╨╡╨╗╨╡╨╡╨▓╨░
//
// third112
// https://habr.com/ru/users/third112/
//
// ╨Ю╨│╨╗╨░╨▓╨╗╨╡╨╜╨╕╨╡
// 1) ╤Б╨╛╨╖╨┤╨░╨╜╨╕╨╡ ╤Д╨╛╤А╨╝╤Л
// 2) ╤А╨░╨▒╨╛╤В╨░ ╤Б ╤В╨░╨▒╨╗╨╕╤Ж╨╡╨╣: ╤Г╨║╨░╨╖╨░╨╜╨╕╨╡ ╨╕ ╨▓╤Л╨▒╨╛╤А
// 3) ╨▓╤Л╤Е╨╛╨┤ ╨╕╨╖ ╨┤╨╕╨░╨╗╨╛╨│╨░

interface

uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls, 
  Buttons, ExtCtrls;

const
 size = 104; // ╤З╨╕╤Б╨╗╨╛ ╤Н╨╗╨╡╨╝╨╡╨╜╤В╨╛╨▓
 
type
 TtableDlg = class(TForm)
    OKBtn: TButton;
    CancelBtn: TButton;
    Bevel1: TBevel;
    Image1: TImage;  //╤В╨░╨▒╨╗╨╕╤Ж╨░ ╤Е╨╕╨╝╨╕╤З╨╡╤Б╨║╨╕╤Е ╤Н╨╗╨╡╨╝╨╡╨╜╤В╨╛╨▓
    Label1: TLabel;
    Image2: TImage;  //╤Г╨┐╤А╨░╨▓╨╗╤П╤О╤Й╨░╤П ╨║╨░╤А╤В╨░
    Label2: TLabel;
    Edit1: TEdit;
    procedure FormCreate(Sender: TObject); // ╤Б╨╛╨╖╨┤╨░╨╜╨╕╨╡ ╤Д╨╛╤А╨╝╤Л
    procedure Image1MouseMove(Sender: TObject; Shift: TShiftState; X,
      Y: Integer);                        // ╤Г╨║╨░╨╖╨░╨╜╨╕╨╡ ╨║╨╗╨╡╤В╨║╨╕
    procedure Image1Click(Sender: TObject); // ╨▓╤Л╨▒╨╛╤А ╨║╨╗╨╡╤В╨║╨╕
    procedure OKBtnClick(Sender: TObject);  // OK
    procedure CancelBtnClick(Sender: TObject); // Cancel
  private
    { Private declarations }
    TableSymbols : array [1..size] of string [2]; // ╨╝╨░╤Б╤Б╨╕╨▓ ╨╛╨▒╨╛╨╖╨╜╨░╤З╨╡╨╜╨╕╨╣ ╤Н╨╗╨╡╨╝╨╡╨╜╤В╨╛╨▓
  public
    { Public declarations }
    selectedElement : string; // ╨▓╤Л╨▒╤А╨░╨╜╨╜╤Л╨╣ ╤Н╨╗╨╡╨╝╨╡╨╜╤В
    currNo : integer;         // ╤В╨╡╨║╤Г╤Й╨╕╨╣ ╨╜╨╛╨╝╨╡╤А ╤Н╨╗╨╡╨╝╨╡╨╜╤В╨░
  end;

var
  tableDlg: TtableDlg;

implementation

{$R *.dfm}

const
PeriodicTableStr1=
'HHeLiBeBCNOFNeNaMgAlSiPSClArKCaScTiVCrMnFeCoNiCuZnGaGeAsSeBrKrRbSrYZrNbMoTcRuRhPdAgCdInSnSbTeIXeCsBaLa';
PeriodicTableStr2='CePrNdPmSmEuGdTbDyHoErTmYbLu';
PeriodicTableStr3='HfTaWReOsIrPtAuHgTlPbBiPoAtRnFrRaAc';
PeriodicTableStr4='ThPaUNpPuAmCmBkCfEsFmMdNoLrKu ';

// ╤Б╨╛╨╖╨┤╨░╨╜╨╕╨╡ ╤Д╨╛╤А╨╝╤Л  ==================================================

procedure TtableDlg.FormCreate(Sender: TObject);
// ╤Б╨╛╨╖╨┤╨░╨╜╨╕╨╡ ╤Д╨╛╤А╨╝╤Л
var
  s : string;
  i,j : integer;
begin
  currNo := 0;
// ╨╕╨╜╨╕╤Ж╨╕╨░╨╗╨╕╨╖╨░╤Ж╨╕╤П ╨╝╨░╤Б╤Б╨╕╨▓╨░ ╨╛╨▒╨╛╨╖╨╜╨░╤З╨╡╨╜╨╕╨╣ ╤Н╨╗╨╡╨╝╨╡╨╜╤В╨╛╨▓:
  s := PeriodicTableStr1+ PeriodicTableStr2+PeriodicTableStr3+PeriodicTableStr4;
  j := 1;
  for i :=1 to size do
   begin
     TableSymbols [i] := s[j];
     inc (j);
     if s [j] in ['a'..'z'] then
      begin
        TableSymbols [i] := TableSymbols [i]+ s [j];
        inc (j);
      end; // if s [j] in
   end; // for i :=1
end; // FormCreate ____________________________________________________

// ╤А╨░╨▒╨╛╤В╨░ ╤Б ╤В╨░╨▒╨╗╨╕╤Ж╨╡╨╣: ╤Г╨║╨░╨╖╨░╨╜╨╕╨╡ ╨╕ ╨▓╤Л╨▒╨╛╤А =========================================

procedure TtableDlg.Image1MouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
// ╤Г╨║╨░╨╖╨░╨╜╨╕╨╡ ╨║╨╗╨╡╤В╨║╨╕
var
  sl : integer;
begin
  sl := GetBValue(Image2.Canvas.Pixels [x,y]);
  if sl in [1..size] then
   begin
    Label1.Caption := intToStr (sl)+ ' '+TableSymbols [sl];
    currNo := sl;
   end
  else
    Label1.Caption := 'Select element:';
end; // Image1MouseMove   ____________________________________________________

procedure TtableDlg.Image1Click(Sender: TObject);
begin
  if currNo <> 0 then
   begin
    selectedElement := TableSymbols [currNo];
    Label2.Caption := intToStr (currNo)+ ' '+selectedElement+ ' selected';
    Edit1.Text := selectedElement;
   end;
end; // Image1Click  ____________________________________________________

// ╨▓╤Л╤Е╨╛╨┤ ╨╕╨╖ ╨┤╨╕╨░╨╗╨╛╨│╨░  ==================================================

procedure TtableDlg.OKBtnClick(Sender: TObject);
begin
    selectedElement := Edit1.Text;
    hide;
end;  // OKBtnClick ____________________________________________________

procedure TtableDlg.CancelBtnClick(Sender: TObject);
begin
  hide;
end;  // CancelBtnClick ____________________________________________________

end.

рд╣рд╛рдореНрд░реЛ рд╕рдВрд╕реНрдХрд░рдгрдорд╛, рд╣рд╛рдореАрд▓реЗ 104 рддрддреНрд╡рд╣рд░реВрдХреЛ рддрд╛рд▓рд┐рдХрд╛ (рд╕реНрдерд┐рд░ рдЖрдХрд╛рд░)ред рд╕реНрдкрд╖реНрдЯ рд░реВрдкрдорд╛ рдпреЛ рдЖрдХрд╛рд░ рдмрдврд╛рдЙрди рд╕рдХрд┐рдиреНрдЫред рддрддреНрд╡ рдкрджрдирд╛рдорд╣рд░реВ (рд░рд╛рд╕рд╛рдпрдирд┐рдХ рдкреНрд░рддреАрдХрд╣рд░реВ) рдПрд░реНрд░реЗрдорд╛ рд▓реЗрдЦрд┐рдПрдХрд╛ рдЫрдиреН рддрд╛рд▓рд┐рдХрд╛ рдкреНрд░рддреАрдХрд╣рд░реВред рдпрджреНрдпрдкрд┐, рд╕реНрд░реЛрдд рдХреЛрдбрдХреЛ рд╕рдВрдХреБрдЪрд┐рддрддрд╛рдХреЛ рдХрд╛рд░рдгрд▓реЗ рдЧрд░реНрджрд╛, рдпреА рдиреЛрдЯреЗрд╢рдирд╣рд░реВрдХреЛ рдХреНрд░рдорд▓рд╛рдИ рд╕реНрдЯреНрд░рд┐рдЩ рд╕реНрдерд┐рд░рд╛рдВрдХрдХреЛ рд░реВрдкрдорд╛ рд▓реЗрдЦреНрди рдЙрдЪрд┐рдд рджреЗрдЦрд┐рдиреНрдЫред PeriodicTableStr1..., PeriodicTableStr4рддрд╛рдХрд┐ рдЬрдм рдлрд╛рд░рдо рдмрдирд╛рдЗрдиреНрдЫ, рдХрд╛рд░реНрдпрдХреНрд░рдо рдЖрдлреИрд▓реЗ array рдХреЛ рддрддреНрд╡рд╣рд░реВ рдмреАрдЪ рдпреА рдкрджрдирд╛рдорд╣рд░реВ рддрд┐рддрд░рдмрд┐рддрд░ рдЧрд░реНрджрдЫред рдкреНрд░рддреНрдпреЗрдХ рддрддреНрд╡ рдкрджрдирд╛рдордорд╛ рдПрдХ рд╡рд╛ рджреБрдИрд╡рдЯрд╛ рд▓реНрдпрд╛рдЯрд┐рди рдЕрдХреНрд╖рд░рд╣рд░реВ рд╣реБрдиреНрдЫрдиреН, рдкрд╣рд┐рд▓реЛ рдЕрдХреНрд╖рд░ рдареВрд▓реЛ рд░ рджреЛрд╕реНрд░реЛ (рдпрджрд┐ рдХреБрдиреИ рд╣реЛ рднрдиреЗ) рд▓реЛрдЕрд░рдХреЗрд╕ рд╣реБрдиреНрдЫред рдПрд░реЗ рд▓реЛрдб рдЧрд░реНрджрд╛ рдпреЛ рд╕рд░рд▓ рдирд┐рдпрдо рд▓рд╛рдЧреВ рд╣реБрдиреНрдЫред рдпрд╕рд░реА, рдиреЛрдЯреЗрд╢рдирд╣рд░реВрдХреЛ рдЕрдиреБрдХреНрд░рдо рдЦрд╛рд▓реА рдард╛рдЙрдБрд╣рд░реВ рдмрд┐рдирд╛ рд╕рдВрдХреНрд╖рд┐рдкреНрдд рд░реВрдкрдорд╛ рд▓реЗрдЦреНрди рд╕рдХрд┐рдиреНрдЫред рдХреНрд░рдорд▓рд╛рдИ рдЪрд╛рд░ рднрд╛рдЧрдорд╛ рд╡рд┐рднрд╛рдЬрди рдЧрд░реНрджреИ (рд╕реНрдерд┐рд░ PeriodicTableStr1..., PeriodicTableStr4) рд╕реНрд░реЛрдд рдХреЛрдб рдкрдвреНрдирдХреЛ рд▓рд╛рдЧрд┐ рд╕рд╣рдЬрддрд╛рдХреЛ рдХрд╛рд░рдгрд▓реЗ рдЧрд░реНрджрд╛ рд╣реЛ рдзреЗрд░реИ рд▓рд╛рдореЛ рд░реЗрдЦрд╛ рд╕реНрдХреНрд░рд┐рдирдорд╛ рдкреВрд░реНрдг рд░реВрдкрдорд╛ рдлрд┐рдЯ рдирд╣реБрди рд╕рдХреНрдЫред

рдЬрдм рдорд╛рдЙрд╕ рдХрд░реНрд╕рд░ рдорд╛рдерд┐ рдЬрд╛рдиреНрдЫ Image1 рд╣реНрдпрд╛рдиреНрдбрд▓рд░ Image1MouseMove рдпреЛ рдШрдЯрдирд╛рд▓реЗ рдирд┐рдпрдиреНрддреНрд░рдг рдХрд╛рд░реНрдб рдкрд┐рдХреНрд╕реЗрд▓рдХреЛ рдиреАрд▓реЛ рд░рдЩ рдШрдЯрдХрдХреЛ рдореВрд▓реНрдп рдирд┐рд░реНрдзрд╛рд░рдг рдЧрд░реНрдЫ Image2 рд╣рд╛рд▓рдХреЛ рдХрд░реНрд╕рд░ рд╕рдордиреНрд╡рдпрдХрд╛ рд▓рд╛рдЧрд┐ред рдирд┐рд░реНрдорд╛рдг рджреНрд╡рд╛рд░рд╛ Image2 рдпрджрд┐ рдХрд░реНрд╕рд░ рд╕реЗрд▓ рднрд┐рддреНрд░ рдЫ рднрдиреЗ рдпреЛ рдорд╛рди рддрддреНрд╡ рд╕рдВрдЦреНрдпрд╛ рдмрд░рд╛рдмрд░ рд╣реБрдиреНрдЫ; рдпрджрд┐ рд╕реАрдорд╛рдорд╛ рд╢реВрдиреНрдп, рд░ рдЕрдиреНрдп рдЕрд╡рд╕реНрдерд╛рдорд╛ 255ред рдХрд╛рд░реНрдпрдХреНрд░рдорджреНрд╡рд╛рд░рд╛ рдЧрд░рд┐рдПрдХрд╛ рдмрд╛рдБрдХреА рдХрд╛рд░реНрдпрд╣рд░реВ рддреБрдЪреНрдЫ рдЫрдиреН рд░ рд╡реНрдпрд╛рдЦреНрдпрд╛рдХреЛ рдЖрд╡рд╢реНрдпрдХрддрд╛ рдкрд░реНрджреИрдиред

рдорд╛рдерд┐ рдЙрд▓реНрд▓реЗрдЦрд┐рдд рд╢реИрд▓реАрдЧрдд рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩ рдкреНрд░рд╡рд┐рдзрд┐рд╣рд░реВрдХреЛ рдЕрддрд┐рд░рд┐рдХреНрдд, рдпреЛ рдЯрд┐рдкреНрдкрдгреА рд╢реИрд▓реАрд▓рд╛рдИ рдзреНрдпрд╛рди рджрд┐рди рд▓рд╛рдпрдХ рдЫред рдХрдбрд╛ рд╢рдмреНрджрдорд╛ рднрдиреНрдиреБрдкрд░реНрджрд╛, рдЫрд▓рдлрд▓ рдЧрд░рд┐рдПрдХреЛ рдХреЛрдб рдпрддрд┐ рд╕рд╛рдиреЛ рд░ рд╕рд░рд▓ рдЫ рдХрд┐ рдЯрд┐рдкреНрдкрдгреАрд╣рд░реВ рд╡рд┐рд╢реЗрд╖ рдЖрд╡рд╢реНрдпрдХ рджреЗрдЦрд┐рдБрджреИрдиред рдпрджреНрдпрдкрд┐, рддрд┐рдиреАрд╣рд░реВ рдкрджреНрдзрддрд┐рдЧрдд рдХрд╛рд░рдгрд╣рд░реВрдХрд╛ рд▓рд╛рдЧрд┐ рдкрдирд┐ рдердкрд┐рдПрдХрд╛ рдерд┐рдП - рдЫреЛрдЯреЛ рдХреЛрдбрд▓реЗ рд╣рд╛рдореАрд▓рд╛рдИ рдХреЗрд╣реА рд╕рд╛рдорд╛рдиреНрдп рдирд┐рд╖реНрдХрд░реНрд╖рд╣рд░реВ рдЕрдЭ рд╕реНрдкрд╖реНрдЯ рд░реВрдкрдорд╛ рдмрдирд╛рдЙрди рдЕрдиреБрдорддрд┐ рджрд┐рдиреНрдЫред рдкреНрд░рд╕реНрддреБрдд рдХреЛрдбрдорд╛ рдПрдХ рд╡рд░реНрдЧ рдШреЛрд╖рдгрд╛ рдЧрд░рд┐рдПрдХреЛ рдЫ (TtableDlg)ред рдпрд╕ рд╡рд░реНрдЧрдХрд╛ рд╡рд┐рдзрд┐рд╣рд░реВ рдмрджрд▓реНрди рд╕рдХрд┐рдиреНрдЫ рд░ рдпрд╕рд▓реЗ рдХреБрдиреИ рдкрдирд┐ рд╣рд┐рд╕рд╛рдмрд▓реЗ рдХрд╛рд░реНрдпрдХреНрд░рдордХреЛ рдХрд╛рд░реНрдпрдкреНрд░рдгрд╛рд▓реАрд▓рд╛рдИ рдЕрд╕рд░ рдЧрд░реНрджреИрди, рддрд░ рдпрд╕рдХреЛ рдкрдардиреАрдпрддрд╛рд▓рд╛рдИ рдЕрд╕рд░ рдЧрд░реНрди рд╕рдХреНрдЫред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдЕрдиреБрдХреНрд░рдо рдХрд▓реНрдкрдирд╛ рдЧрд░реНрдиреБрд╣реЛрд╕реН:

OKBtnClick, Image1MouseMove, FormCreate, Image1Click, CancelBtnClick.

рдпреЛ рдзреЗрд░реИ рдзреНрдпрд╛рдирдпреЛрдЧреНрдп рдирд╣реБрди рд╕рдХреНрдЫ, рддрд░ рдпреЛ рдкрдвреНрди рд░ рдмреБрдЭреНрди рдЕрд▓рд┐ рдмрдвреА рдЧрд╛рд╣реНрд░реЛ рд╣реБрдиреЗрдЫред рдпрджрд┐ рддреНрдпрд╣рд╛рдБ рдкрд╛рдБрдЪ рдЫреИрди, рддрд░ рдЦрдгреНрдбрдорд╛ рджрд╕реМрдВ рдЧреБрдгрд╛ рдмрдвреА рд╡рд┐рдзрд┐рд╣рд░реВ рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди рддрд┐рдиреАрд╣рд░реВрд╕рдБрдЧ рд╡рд░реНрдЧ рд╡рд┐рд╡рд░рдгрд╣рд░реВ рднрдиреНрджрд╛ рдкреВрд░реНрдг рд░реВрдкрдорд╛ рдлрд░рдХ рдХреНрд░рдо рдЫ, рддреНрдпрд╕рдкрдЫрд┐ рдЕрд░рд╛рдЬрдХрддрд╛ рдорд╛рддреНрд░ рдмрдвреНрдиреЗрдЫред рддрд╕рд░реНрде, рдпрджреНрдпрдкрд┐ рдпреЛ рдХрдбрд╛рдИрдХрд╛ рд╕рд╛рде рдкреНрд░рдорд╛рдгрд┐рдд рдЧрд░реНрди рдЧрд╛рд╣реНрд░реЛ рдЫ рд░ рдЕрд╕рдореНрднрд╡ рдкрдирд┐ рд╣реБрди рд╕рдХреНрдЫ, рдХрд╕реИрд▓реЗ рдЖрд╢рд╛ рдЧрд░реНрди рд╕рдХреНрдЫ рдХрд┐ рдердк рдЕрд░реНрдбрд░рдХреЛ рдкрд░рд┐рдЪрдпрд▓реЗ рдХреЛрдбрдХреЛ рдкрдардиреАрдпрддрд╛рдорд╛ рд╕реБрдзрд╛рд░ рдЧрд░реНрдиреЗрдЫред рдпрд╕ рдЕрддрд┐рд░рд┐рдХреНрдд рдЕрд░реНрдбрд░рд▓рд╛рдИ рд╕рдореНрдмрдиреНрдзрд┐рдд рдХрд╛рд░реНрдпрд╣рд░реВ рдЧрд░реНрдиреЗ рдзреЗрд░реИ рд╡рд┐рдзрд┐рд╣рд░реВрдХреЛ рддрд╛рд░реНрдХрд┐рдХ рд╕рдореВрд╣реАрдХрд░рдгрджреНрд╡рд╛рд░рд╛ рд╕рд╣рдЬреАрдХрд░рдг рдЧрд░рд┐рдПрдХреЛ рдЫред рдкреНрд░рддреНрдпреЗрдХ рд╕рдореВрд╣рд▓рд╛рдИ рд╢реАрд░реНрд╖рдХ рджрд┐рдЗрдиреБрдкрд░реНрдЫ, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐:

// ╤А╨░╨▒╨╛╤В╨░ ╤Б ╤В╨░╨▒╨╗╨╕╤Ж╨╡╨╣: ╤Г╨║╨░╨╖╨░╨╜╨╕╨╡ ╨╕ ╨▓╤Л╨▒╨╛╤А

рдпреА рд╢реАрд░реНрд╖рдХрд╣рд░реВ рдореЛрдбреНрдпреБрд▓рдХреЛ рд╕реБрд░реБрдорд╛ рдкреНрд░рддрд┐рд▓рд┐рдкрд┐ рдЧрд░рд┐рдиреБ рдкрд░реНрдЫ рд░ рд╕рд╛рдордЧреНрд░реАрдХреЛ рддрд╛рд▓рд┐рдХрд╛рдХреЛ рд░реВрдкрдорд╛ рдврд╛рдБрдЪрд╛рдмрджреНрдз рдЧрд░реНрдиреБрдкрд░реНрдЫред рдзреЗрд░реИ рд▓рд╛рдореЛ рдореЛрдбреНрдпреБрд▓рд╣рд░реВрдХреЛ рдХреЗрд╣реА рдЕрд╡рд╕реНрдерд╛рдорд╛, рд╕рд╛рдордЧреНрд░реАрдХреЛ рддреНрдпрд╕реНрддрд╛ рддрд╛рд▓рд┐рдХрд╛рд╣рд░реВрд▓реЗ рдердк рдиреЗрднрд┐рдЧреЗрд╕рди рд╡рд┐рдХрд▓реНрдкрд╣рд░реВ рдкреНрд░рджрд╛рди рдЧрд░реНрджрдЫред рддреНрдпрд╕реИ рдЧрд░реА, рдПрдХ рд╡рд┐рдзрд┐, рдкреНрд░рдХреНрд░рд┐рдпрд╛ рд╡рд╛ рдкреНрд░рдХрд╛рд░реНрдпрдХреЛ рд▓рд╛рдореЛ рд╢рд░реАрд░рдорд╛, рдпреЛ рдореВрд▓реНрдпрд╡рд╛рди рдЫ, рдкрд╣рд┐рд▓реЗ, рдпрд╕ рд╢рд░реАрд░рдХреЛ рдЕрдиреНрддреНрдп рдЪрд┐рдиреНрд╣ рд▓рдЧрд╛рдЙрдБрджреИ:

end; // FormCreate

рд░, рджреЛрд╕реНрд░реЛ, рдХрд╛рд░реНрдпрдХреНрд░рдо рдХреЛрд╖реНрдардХрдХреЛ рд╕рд╛рде рд╢рд╛рдЦрд╛рдпреБрдХреНрдд рдХрдердирд╣рд░реВрдорд╛ рд╕реБрд░реБ - рдЕрдиреНрддреНрдпрдорд╛, рдмрдиреНрдж рд╣реБрдиреЗ рдХреЛрд╖реНрдардХрд▓реЗ рд╕рдиреНрджрд░реНрдн рдЧрд░реНрдиреЗ рдХрдердирд▓рд╛рдИ рдЪрд┐рдиреНрд╣ рд▓рдЧрд╛рдЙрдиреБрд╣реЛрд╕реН:

      end; // if s [j] in
   end; // for i :=1
end; // FormCreate

рд╕рдореВрд╣ рд╣реЗрдбрд░рд╣рд░реВ рд░ рд╡рд┐рдзрд┐ рдирд┐рдХрд╛рдпрд╣рд░реВрдХреЛ рдЫреЗрдЙрд▓рд╛рдИ рд╣рд╛рдЗрд▓рд╛рдЗрдЯ рдЧрд░реНрди, рддрдкрд╛рдИрдВрд▓реЗ рдзреЗрд░реИ рдЕрдкрд░реЗрдЯрд░рд╣рд░реВ рднрдиреНрджрд╛ рд▓рд╛рдореЛ рд▓рд╛рдЗрдирд╣рд░реВ рдердкреНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ рд░ рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдХреНрд░рдорд╢рдГ "=" рд░ "_" рдЕрдХреНрд╖рд░рд╣рд░реВ рд╕рдорд╛рд╡реЗрд╢ рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫред
рдлреЗрд░рд┐, рд╣рд╛рдореАрд▓реЗ рдЖрд░рдХреНрд╖рдг рдЧрд░реНрди рдЖрд╡рд╢реНрдпрдХ рдЫ: рд╣рд╛рдореНрд░реЛ рдЙрджрд╛рд╣рд░рдг рдзреЗрд░реИ рд╕рд░рд▓ рдЫред рд░ рдЬрдм рдПрдХ рд╡рд┐рдзрд┐рдХреЛ рдХреЛрдб рдПрдЙрдЯреИ рд╕реНрдХреНрд░рд┐рдирдорд╛ рдлрд┐рдЯ рд╣реБрдБрджреИрди, рдХреЛрдб рдкрд░рд┐рд╡рд░реНрддрди рдЧрд░реНрдирдХреЛ рд▓рд╛рдЧрд┐ рд▓рдЧрд╛рддрд╛рд░ рдЫ рд╡рдЯрд╛ рдЕрдиреНрдд рдмреБрдЭреНрди рдЧрд╛рд╣реНрд░реЛ рд╣реБрди рд╕рдХреНрдЫред рдХреЗрд╣реА рдкреБрд░рд╛рдирд╛ рдХрдореНрдкрд╛рдЗрд▓рд░рд╣рд░реВрдорд╛, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, OS IBM 8000/360 рдХреЛ рд▓рд╛рдЧрд┐ Pascal 370, рдпрд╕ рдкреНрд░рдХрд╛рд░рдХреЛ рд╕реЗрд╡рд╛ рд╕реНрддрдореНрдн рд╕реВрдЪреАрдорд╛ рдмрд╛рдБрдпрд╛рдорд╛ рдЫрд╛рдкрд┐рдПрдХреЛ рдерд┐рдпреЛред

B5
тАж
E5

рдпрд╕рдХреЛ рдорддрд▓рдм рд░реЗрдЦрд╛ E5 рдорд╛ рдмрдиреНрдж рд╣реБрдиреЗ рдХреЛрд╖реНрдардХ B5 рд▓рд╛рдИ рдЦреЛрд▓реНрдиреЗ рдХреЛрд╖реНрдардХрд╕рдБрдЧ рдореЗрд▓ рдЦрд╛рдиреНрдЫред

рдирд┐рд╕реНрд╕рдиреНрджреЗрд╣, рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдЩ рд╢реИрд▓реА рдПрдХ рдзреЗрд░реИ рд╡рд┐рд╡рд╛рджрд╛рд╕реНрдкрдж рдореБрджреНрджрд╛ рд╣реЛ, рддреНрдпрд╕реИрд▓реЗ рдпрд╣рд╛рдБ рд╡реНрдпрдХреНрдд рд╡рд┐рдЪрд╛рд░рд╣рд░реВ рд╡рд┐рдЪрд╛рд░рдХреЛ рд▓рд╛рдЧрд┐ рдЦрд╛рдирд╛ рдмрд╛рд╣реЗрдХ рдЕрд░реВ рдХреЗрд╣рд┐рдХреЛ рд░реВрдкрдорд╛ рд▓рд┐рдиреБ рд╣реБрдБрджреИрдиред рдзреЗрд░реИ рд╡рд░реНрд╖рдХреЛ рдХрд╛рдордорд╛ рдмрд┐рднрд┐рдиреНрди рд╢реИрд▓реАрд╣рд░реВ рд╡рд┐рдХрд╛рд╕ рдЧрд░реА рдЕрднреНрдпрд╕реНрдд рднрдПрдХрд╛ рджреБрдИ рд░рд╛рдореНрд░реЛ рдЕрдиреБрднрд╡реА рдкреНрд░реЛрдЧреНрд░рд╛рдорд░рд╣рд░реВрдХрд╛ рд▓рд╛рдЧрд┐ рд╕рдореНрдЭреМрддрд╛рдорд╛ рдЖрдЙрди рдзреЗрд░реИ рдЧрд╛рд╣реНрд░реЛ рд╣реБрди рд╕рдХреНрдЫред рдХрд╛рд░реНрдпрдХреНрд░рдо рдЧрд░реНрди рд╕рд┐рдХреНрдиреЗ рд╡рд┐рджреНрдпрд╛рд░реНрдереАрдХреЛ рд▓рд╛рдЧрд┐ рдпреЛ рдлрд░рдХ рдХреБрд░рд╛ рд╣реЛ рдЬрд╕рдХреЛ рдЖрдлреНрдиреИ рд╢реИрд▓реА рдЦреЛрдЬреНрдиреЗ рд╕рдордп рдЫреИрдиред рдорд▓рд╛рдИ рд▓рд╛рдЧреНрдЫ рдХрд┐ рдпрд╕ рдЕрд╡рд╕реНрдерд╛рдорд╛ рд╢рд┐рдХреНрд╖рдХрд▓реЗ рдХрдореНрддрд┐рдорд╛ рдЖрдлреНрдирд╛ рд╡рд┐рджреНрдпрд╛рд░реНрдереАрд╣рд░реВрд▓рд╛рдИ рдпрд╕реНрддреЛ рд╕рд░рд▓, рддрд░ рд╕реНрдкрд╖реНрдЯ рд╡рд┐рдЪрд╛рд░ рд╣реЛрдЗрди рдХрд┐ рдХрд╛рд░реНрдпрдХреНрд░рдордХреЛ рд╕рдлрд▓рддрд╛ рдзреЗрд░реИ рд╣рджрд╕рдореНрдо рдпрд╕рдХреЛ рд╕реНрд░реЛрдд рдХреЛрдб рд▓реЗрдЦрд┐рдПрдХреЛ рд╢реИрд▓реАрдорд╛ рдирд┐рд░реНрднрд░ рдЧрд░реНрджрдЫред рд╡рд┐рджреНрдпрд╛рд░реНрдереАрд▓реЗ рд╕рд┐рдлрд╛рд░рд┐рд╕ рдЧрд░рд┐рдПрдХреЛ рд╢реИрд▓реА рдкрд╛рд▓рдирд╛ рдирдЧрд░реНрди рд╕рдХреНрдЫ, рддрд░ рдЙрд╕рд▓рд╛рдИ рд╕реНрд░реЛрдд рдХреЛрдбрдХреЛ рдбрд┐рдЬрд╛рдЗрди рд╕реБрдзрд╛рд░ рдЧрд░реНрди "рдЕрддрд┐рд░рд┐рдХреНрдд" рдХрд╛рд░реНрдпрд╣рд░реВрдХреЛ рдЖрд╡рд╢реНрдпрдХрддрд╛ рдмрд╛рд░реЗ рд╕реЛрдЪреНрди рджрд┐рдиреБрд╣реЛрд╕реНред

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

рддрд░ рд╕реНрдерд╛рдиреАрдп рдбрд╛рдЯрд╛рдмреЗрд╕ рд╕реАрдорд╛ рд╣реЛрдЗрдиред рдХрд╛рд░реНрдпрдХреНрд░рдо рд╕реНрд╡рд╛рднрд╛рд╡рд┐рдХ рд░реВрдкрдорд╛ рдЗрдиреНрдЯрд░рдиреЗрдЯрдорд╛ рдЬрдбрд╛рди рд╣реБрдиреНрдЫред рдЬрдм рддрдкрд╛рдЗрдБ рдПрдХ рддрддреНрд╡ рдЪрдпрди рдЧрд░реНрдиреБрд╣реБрдиреНрдЫ, рд▓рд┐рдЩреНрдХ рд╕рдХреНрд░рд┐рдп рд╣реБрдиреНрдЫ, рд░ рдпрд╕ рддрддреНрд╡рдХреЛ рдмрд╛рд░реЗрдорд╛ рд╡рд┐рдХрд┐рдкрд┐рдбрд┐рдпрд╛ рд▓реЗрдЦ рд╡реЗрдм рдмреНрд░рд╛рдЙрдЬрд░ рд╡рд┐рдиреНрдбреЛрдорд╛ рдЦреЛрд▓рд┐рдиреНрдЫред рд╡рд┐рдХрд┐рдкрд┐рдбрд┐рдпрд╛, рддрдкрд╛рдИрд▓рд╛рдИ рдерд╛рд╣рд╛ рдЫ, рдЖрдзрд┐рдХрд╛рд░рд┐рдХ рд╕реНрд░реЛрдд рд╣реЛрдЗрдиред рддрдкрд╛рдИрдВ рдЖрдзрд┐рдХрд╛рд░рд┐рдХ рд╕реНрд░реЛрддрд╣рд░реВрдорд╛ рд▓рд┐рдЩреНрдХрд╣рд░реВ рд╕реЗрдЯ рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рд░рд╛рд╕рд╛рдпрдирд┐рдХ рд╡рд┐рд╢реНрд╡рдХреЛрд╢, TSB, рд╕рд╛рд░ рдЬрд░реНрдирд▓рд╣рд░реВ, рдпрд╕ рддрддреНрд╡рдХреЛ рд▓рд╛рдЧрд┐ рдЦреЛрдЬ рдЗрдиреНрдЬрд┐рдирд╣рд░реВрдорд╛ рдЕрд░реНрдбрд░ рдХреНрд╡реЗрд░реАрд╣рд░реВ, рдЖрджрд┐ред рддреНрдпреЛред рд╡рд┐рджреНрдпрд╛рд░реНрдереАрд╣рд░реВрд▓реЗ DBMS рд░ рдЗрдиреНрдЯрд░рдиреЗрдЯ рд╡рд┐рд╖рдпрд╣рд░реВрдорд╛ рд╕рд░рд▓ рддрд░ рдЕрд░реНрдердкреВрд░реНрдг рдЕрд╕рд╛рдЗрдирдореЗрдиреНрдЯрд╣рд░реВ рдкреВрд░рд╛ рдЧрд░реНрди рд╕рдХреНрд╖рдо рд╣реБрдиреЗрдЫрдиреНред

рдПрдХ рд╡реНрдпрдХреНрддрд┐рдЧрдд рддрддреНрд╡рдорд╛ рдкреНрд░рд╢реНрдирд╣рд░реВрдХреЛ рдЕрддрд┐рд░рд┐рдХреНрдд, рддрдкрд╛рдИрдВрд▓реЗ рдХрд╛рд░реНрдпрдХреНрд╖рдорддрд╛ рд╕рд┐рд░реНрдЬрдирд╛ рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ рдЬреБрди, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рд╡рд┐рднрд┐рдиреНрди рд░рдЩрд╣рд░реВрд╕рдБрдЧ рдирд┐рд╢реНрдЪрд┐рдд рдорд╛рдкрджрдгреНрдбрд╣рд░реВ рдкреВрд░рд╛ рдЧрд░реНрдиреЗ рддрд╛рд▓рд┐рдХрд╛рдорд╛ рдХрдХреНрд╖рд╣рд░реВрд▓рд╛рдИ рдЪрд┐рдиреНрд╣ рд▓рдЧрд╛рдЙрдБрджрдЫред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдзрд╛рддреБ рд░ рдЧреИрд░-рдзрд╛рддреБрд╣рд░реВред рд╡рд╛ рдХреЛрд╢рд┐рдХрд╛рд╣рд░реВ рдЬреБрди рд╕реНрдерд╛рдиреАрдп рд░рд╛рд╕рд╛рдпрдирд┐рдХ рдкреНрд▓рд╛рдиреНрдЯрджреНрд╡рд╛рд░рд╛ рдЬрд▓ рдирд┐рдХрд╛рдпрд╣рд░реВрдорд╛ рдлреНрдпрд╛рдБрдХрд┐рдПрдХреЛ рдЫред

рддрдкрд╛рдИрд▓реЗ рдиреЛрдЯрдмреБрдХ рдЖрдпреЛрдЬрдХрдХреЛ рдХрд╛рд░реНрдпрд╣рд░реВ рдкрдирд┐ рд▓рд╛рдЧреВ рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдкрд░реАрдХреНрд╖рд╛рдорд╛ рд╕рдорд╛рд╡реЗрд╢ рдЧрд░рд┐рдПрдХрд╛ рддрддреНрд╡рд╣рд░реВрд▓рд╛рдИ рддрд╛рд▓рд┐рдХрд╛рдорд╛ рд╣рд╛рдЗрд▓рд╛рдЗрдЯ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рддреНрдпрд╕рдкрдЫрд┐ рдкрд░реАрдХреНрд╖рд╛рдХреЛ рддрдпрд╛рд░реАрдорд╛ рд╡рд┐рджреНрдпрд╛рд░реНрдереАрд▓реЗ рдЕрдзреНрдпрдпрди рдЧрд░реЗрдХреЛ/рджреЛрд╣реЛрд░реНрдпрд╛рдЗрдПрдХреЛ рддрддреНрд╡рд╣рд░реВрд▓рд╛рдИ рд╣рд╛рдЗрд▓рд╛рдЗрдЯ рдЧрд░реНрдиреБрд╣реЛрд╕реНред

рд░ рдпрд╣рд╛рдБ, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рд╕рд╛рдорд╛рдиреНрдп рд╡рд┐рджреНрдпрд╛рд▓рдп рд░рд╕рд╛рдпрди рд╕рдорд╕реНрдпрд╛рд╣рд░реВ рдордзреНрдпреЗ рдПрдХ рд╣реЛ:

10 рдЧреНрд░рд╛рдо рдЪрдХ рджрд┐рдПред рдпреЛ рд╕рдмреИ рдЪрдХ рдкрдШрд╛рдЙрди рдХрддрд┐ рд╣рд╛рдЗрдбреНрд░реЛрдХреНрд▓реЛрд░рд┐рдХ рдПрд╕рд┐рдб рд▓рд┐рдиреБ рдкрд░реНрдЫ?

рдпреЛ рд╕рдорд╕реНрдпрд╛ рд╕рдорд╛рдзрд╛рди рдЧрд░реНрди, рдпреЛ рд░рд╕рд╛рдпрди рд▓реЗрдЦреНрди рдЖрд╡рд╢реНрдпрдХ рдЫред рдкреНрд░рддрд┐рдХреНрд░рд┐рдпрд╛ рд░ рдпрд╕рдорд╛ рдЧреБрдгрд╛рдВрдХрд╣рд░реВ рд░рд╛рдЦреЗрд░, рдХреНрдпрд╛рд▓реНрд╕рд┐рдпрдо рдХрд╛рд░реНрдмреЛрдиреЗрдЯ рд░ рд╣рд╛рдЗрдбреНрд░реЛрдЬрди рдХреНрд▓реЛрд░рд╛рдЗрдбрдХреЛ рдЖрдгрд╡рд┐рдХ рд╡рдЬрдирд╣рд░реВ рдЧрдгрдирд╛ рдЧрд░реНрдиреБрд╣реЛрд╕реН, рддреНрдпрд╕рдкрдЫрд┐ рд░рдЪрдирд╛ рдЧрд░реНрдиреБрд╣реЛрд╕реН рд░ рдЕрдиреБрдкрд╛рдд рд╕рдорд╛рдзрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реНред рд╣рд╛рдореНрд░реЛ рдЖрдзрд╛рд░рднреВрдд рдХрд╛рд░реНрдпрдХреНрд░рдордорд╛ рдЖрдзрд╛рд░рд┐рдд рдХреНрдпрд╛рд▓рдХреБрд▓реЗрдЯрд░рд▓реЗ рдЧрдгрдирд╛ рд░ рд╕рдорд╛рдзрд╛рди рдЧрд░реНрди рд╕рдХреНрдЫред рд╕рд╛рдБрдЪреЛ, рддрдкрд╛рдИрд▓реЗ рдЕрдЭреИ рдкрдирд┐ рдзреНрдпрд╛рдирдорд╛ рд░рд╛рдЦреНрдиреБ рдкрд░реНрдЫ рдХрд┐ рдПрд╕рд┐рдб рдЙрдЪрд┐рдд рдорд╛рддреНрд░рд╛рдорд╛ рд░ рдЙрдЪрд┐рдд рдПрдХрд╛рдЧреНрд░рддрд╛рдорд╛ рд▓рд┐рдиреБ рдкрд░реНрдЫ, рддрд░ рдпреЛ рд░рд╕рд╛рдпрди рд╡рд┐рдЬреНрдЮрд╛рди рд╣реЛ, рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рди рд╣реЛрдЗрдиред
рдкрд░рд┐рд╢рд┐рд╖реНрдЯ 1: рдХрд╕рд░реА рд░рд╕рд╛рдпрди рд╡рд┐рдЬреНрдЮрд╛рди рдХреНрдпрд╛рд▓реНрдХреБрд▓реЗрдЯрд░ рдХрд╛рдо рдЧрд░реНрджрдЫрдЪрдХ рд░ "рд╣реЛрдЬрдкреЛрдЬ" рдХреЛ рдорд╛рдерд┐рдХреЛ рд╕рдорд╕реНрдпрд╛рдХреЛ рдЙрджрд╛рд╣рд░рдг рдкреНрд░рдпреЛрдЧ рдЧрд░реЗрд░ рдХреНрдпрд╛рд▓реНрдХреБрд▓реЗрдЯрд░рдХреЛ рд╕рдЮреНрдЪрд╛рд▓рдирдХреЛ рд╡рд┐рд╢реНрд▓реЗрд╖рдг рдЧрд░реМрдВред рдкреНрд░рддрд┐рдХреНрд░рд┐рдпрд╛рдХреЛ рд╕рд╛рде рд╕реБрд░реБ рдЧрд░реМрдВ:

CaCO3 + 2HCl = CaCl2 + H2O

рдпрд╕рдмрд╛рдЯ рд╣рд╛рдореА рджреЗрдЦреНрдЫреМрдВ рдХрд┐ рд╣рд╛рдореАрд▓рд╛рдИ рдирд┐рдореНрди рддрддреНрд╡рд╣рд░реВрдХреЛ рдкрд░рдорд╛рдгреБ рд╡рдЬрди рдЪрд╛рд╣рд┐рдиреНрдЫ: рдХреНрдпрд╛рд▓реНрд╕рд┐рдпрдо (Ca), рдХрд╛рд░реНрдмрди (C), рдЕрдХреНрд╕рд┐рдЬрди (O), рд╣рд╛рдЗрдбреНрд░реЛрдЬрди (H) рд░ рдХреНрд▓реЛрд░реАрди (Cl)ред рд╕рд░рд▓ рдЕрд╡рд╕реНрдерд╛рдорд╛, рд╣рд╛рдореА рдпреА рддреМрд▓рд╣рд░реВрд▓рд╛рдИ рдкрд░рд┐рднрд╛рд╖рд┐рдд рдЧрд░рд┐рдПрдХреЛ рдПрдХ-рдЖрдпрд╛рдореА рдПрд░реЗрдорд╛ рд▓реЗрдЦреНрди рд╕рдХреНрдЫреМрдВ

AtomicMass : array [1..size] of real;

рдЬрд╣рд╛рдБ рдПрд░реЗ рдЕрдиреБрдХреНрд░рдордгрд┐рдХрд╛ рддрддреНрд╡ рд╕рдВрдЦреНрдпрд╛рд╕рдБрдЧ рдореЗрд▓ рдЦрд╛рдиреНрдЫред рдлрд╛рд░рдордХреЛ рдЦрд╛рд▓реА рдард╛рдЙрдБрдорд╛ рдердк tableDlg рджреБрдИ рдХреНрд╖реЗрддреНрд░ рд░рд╛рдЦреНрдиреБрд╣реЛрд╕реНред рдкрд╣рд┐рд▓реЛ рдлрд┐рд▓реНрдбрдорд╛ рдпреЛ рд╕реБрд░реБрдорд╛ рд▓реЗрдЦрд┐рдПрдХреЛ рдЫ: "рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХ рджрд┐рдЗрдПрдХреЛ рдЫ", рджреЛрд╕реНрд░реЛрдорд╛ - "рджреЛрд╕реНрд░реЛ рдЕрднрд┐рдХрд░реНрдордХ x рдлреЗрд▓рд╛ рдкрд╛рд░реНрдиреБ рд╣реЛ"ред рдлрд┐рд▓реНрдбрд╣рд░реВ рдмреБрдЭреМрдВ рдЕрднрд┐рдХрд░реНрдордХ рез, рдЕрднрд┐рдХрд░реНрдордХ рез рдХреНрд░рдорд╢рдГред рдХрд╛рд░реНрдпрдХреНрд░рдордорд╛ рдЕрдиреНрдп рдердкрд╣рд░реВ рдХреНрдпрд╛рд▓реНрдХреБрд▓реЗрдЯрд░рдХреЛ рдирд┐рдореНрди рдЙрджрд╛рд╣рд░рдгрдмрд╛рдЯ рд╕реНрдкрд╖реНрдЯ рд╣реБрдиреЗрдЫред

рд╣рд╛рдореА рдХрдореНрдкреНрдпреБрдЯрд░ рдХрд┐рдмреЛрд░реНрдбрдорд╛ рдЯрд╛рдЗрдк рдЧрд░реНрдЫреМрдВ: 10 рдЧреНрд░рд╛рдоред рдлрд┐рд▓реНрдбрдорд╛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХ 10 рдЧреНрд░рд╛рдо рджрд┐рдЗрдПрдХреЛ рдЫред" рдЕрдм рд╣рд╛рдореА рдпрд╕ рдЕрднрд┐рдХрд░реНрдордХрдХреЛ рд╕реВрддреНрд░ рдкреНрд░рд╡рд┐рд╖реНрдЯ рдЧрд░реНрдЫреМрдВ, рд░ рдХреНрдпрд╛рд▓рдХреБрд▓реЗрдЯрд░рд▓реЗ рдЧрдгрдирд╛ рдЧрд░реНрдиреЗрдЫ рд░ рддрдкрд╛рдИрд▓реЗ рдпрд╕рд▓рд╛рдИ рдкреНрд░рд╡рд┐рд╖реНрдЯ рдЧрд░реНрджрд╛ рдпрд╕рдХреЛ рдЖрдгрд╡рд┐рдХ рд╡рдЬрди рджреЗрдЦрд╛рдЙрдиреЗрдЫред

Ca рдкреНрд░рддреАрдХрдХреЛ рд╕рд╛рде рдЯреЗрдмрд▓ рд╕реЗрд▓рдорд╛ LMB рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рдХреНрд╖реЗрддреНрд░рдорд╛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХ Ca 40.078 рджрд┐рдЗрдпреЛ 10 рдЧреНрд░рд╛рдоред"

C рдЪрд┐рдиреНрд╣рдХреЛ рд╕рд╛рде рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рдорд╛ LMB рдорд╛ рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рдлрд┐рд▓реНрдбрдорд╛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХ CaC 52.089 рджрд┐рдЗрдпреЛ 10 рдЧреНрд░рд╛рдоред" рддреАред рдХреНрдпрд╛рд▓реНрдХреБрд▓реЗрдЯрд░рд▓реЗ рдХреНрдпрд╛рд▓реНрд╕рд┐рдпрдо рд░ рдХрд╛рд░реНрдмрдирдХреЛ рдкрд░рдорд╛рдгреБ рд╡рдЬрдирд╣рд░реВ рдердкреНрдпреЛред

O рдЪрд┐рдиреНрд╣рдХреЛ рд╕рд╛рде рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рдорд╛ LMB рдорд╛ рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рдлрд┐рд▓реНрдбрдорд╛ рд░рд╣реЗрдХреЛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХ CaCO 68.088 рджрд┐рдЗрдпреЛ 10 рдЧреНрд░рд╛рдоред" рдХреНрдпрд╛рд▓рдХреБрд▓реЗрдЯрд░рд▓реЗ рдпреЛрдЧрдлрд▓рдорд╛ рдЕрдХреНрд╕рд┐рдЬрдирдХреЛ рдкрд░рдорд╛рдгреБ рд╡рдЬрди рдердкреНрдпреЛред

O рдЪрд┐рдиреНрд╣рдХреЛ рд╕рд╛рде рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рдорд╛ LMB рдорд╛ рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рдлрд┐рд▓реНрдбрдорд╛ рд░рд╣реЗрдХреЛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХ CaCO2 84.087 рджрд┐рдЗрдпреЛ 10 рдЧреНрд░рд╛рдоред" рдХреНрдпрд╛рд▓реНрдХреБрд▓реЗрдЯрд░рд▓реЗ рдлреЗрд░рд┐ рдЕрдХреНрд╕рд┐рдЬрдирдХреЛ рдЖрдгрд╡рд┐рдХ рд╡рдЬрдирд▓рд╛рдИ рдпреЛрдЧрдлрд▓рдорд╛ рдердкреНрдпреЛред

O рдЪрд┐рдиреНрд╣рдХреЛ рд╕рд╛рде рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рдорд╛ LMB рдорд╛ рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рдлрд┐рд▓реНрдбрдорд╛ рд░рд╣реЗрдХреЛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХ CaCO3 100.086 рджрд┐рдЗрдпреЛ 10 рдЧреНрд░рд╛рдоред" рдХреНрдпрд╛рд▓реНрдХреБрд▓реЗрдЯрд░рд▓реЗ рдлреЗрд░рд┐ рдЕрдХреНрд╕рд┐рдЬрдирдХреЛ рдЖрдгрд╡рд┐рдХ рд╡рдЬрдирд▓рд╛рдИ рдпреЛрдЧрдлрд▓рдорд╛ рдердкреНрдпреЛред

рдЖрдлреНрдиреЛ рдХрдореНрдкреНрдпреБрдЯрд░ рдХрд┐рдмреЛрд░реНрдбрдорд╛ Enter рдерд┐рдЪреНрдиреБрд╣реЛрд╕реНред рдкрд╣рд┐рд▓реЛ рдЕрднрд┐рдХрд░реНрдордХрдХреЛ рдкрд░рд┐рдЪрдп рдкреВрд░рд╛ рднрдпреЛ рд░ рдлрд┐рд▓реНрдбрдорд╛ рд╕реНрд╡рд┐рдЪ рд╣реБрдиреНрдЫ рдЕрднрд┐рдХрд░реНрдордХ резред рдзреНрдпрд╛рди рджрд┐рдиреБрд╣реЛрд╕реН рдХрд┐ рдпрд╕ рдЙрджрд╛рд╣рд░рдгрдорд╛ рд╣рд╛рдореАрд▓реЗ рдиреНрдпреВрдирддрдо рд╕рдВрд╕реНрдХрд░рдг рдкреНрд░рджрд╛рди рдЧрд░реНрджреИрдЫреМрдВред рдпрджрд┐ рдЪрд╛рд╣рд┐рдпреЛ рднрдиреЗ, рддрдкрд╛рдИрдВ рд╕рдЬрд┐рд▓реИрд╕рдБрдЧ рд╕рдорд╛рди рдкреНрд░рдХрд╛рд░рдХрд╛ рдкрд░рдорд╛рдгреБрд╣рд░реВрдХреЛ рдЧреБрдгрдХрд╣рд░реВ рд╡реНрдпрд╡рд╕реНрдерд┐рдд рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ, рддрд╛рдХрд┐, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рддрдкрд╛рдИрдВрд▓реЗ рдХреНрд░реЛрдорд┐рдпрдо рд╕реВрддреНрд░ (K2Cr2O7) рдкреНрд░рд╡рд┐рд╖реНрдЯ рдЧрд░реНрджрд╛ рдЕрдХреНрд╕рд┐рдЬрди рд╕реЗрд▓рдорд╛ рдкрдЩреНрдХреНрддрд┐рдорд╛ рд╕рд╛рдд рдкрдЯрдХ рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрдкрд░реНрджреИрдиред

рдлрд┐рд▓реНрдбрдорд╛ рд░рд╣реЗрдХреЛ H. рд╢рд┐рд▓рд╛рд▓реЗрдЦрдХреЛ рд╕рд╛рде рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рдорд╛ LMB рдорд╛ рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реН рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рд╕реЗрдХреЗрдиреНрдб рдЕрднрд┐рдХрд░реНрдордХ H 1.008 рдПрдХреНрд╕ рдлреЗрд▓рд╛ рдкрд╛рд░реНрдиреБрд╣реЛрд╕реНред"

Cl рдкреНрд░рддреАрдХрдХреЛ рд╕рд╛рде рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рдорд╛ LMB рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рдХреНрд╖реЗрддреНрд░рдорд╛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рд╕реЗрдХреЗрдиреНрдб рдЕрднрд┐рдХрд░реНрдордХ HCl 36.458 рдПрдХреНрд╕ рдлреЗрд▓рд╛ рдкрд╛рд░реНрдиреБрд╣реЛрд╕реНред" рдХреНрдпрд╛рд▓рдХреБрд▓реЗрдЯрд░рд▓реЗ рд╣рд╛рдЗрдбреНрд░реЛрдЬрди рд░ рдХреНрд▓реЛрд░реАрдирдХреЛ рдкрд░рдорд╛рдгреБ рд╡рдЬрдирд╣рд░реВ рдердкреНрдпреЛред рдорд╛рдерд┐рдХреЛ рдкреНрд░рддрд┐рдХреНрд░рд┐рдпрд╛ рд╕рдореАрдХрд░рдгрдорд╛, рд╣рд╛рдЗрдбреНрд░реЛрдЬрди рдХреНрд▓реЛрд░рд╛рдЗрдб 2 рдХреЛ рдЧреБрдгрд╛рдВрдХрд▓реЗ рдЕрдЧрд╛рдбрд┐ рдЫред рддреНрдпрд╕реИрд▓реЗ, рдлрд┐рд▓реНрдбрдорд╛ LMB рдХреНрд▓рд┐рдХ рдЧрд░реНрдиреБрд╣реЛрд╕реНред рдЕрднрд┐рдХрд░реНрдордХ резред рдЖрдгрд╡рд┐рдХ рд╡рдЬрди рджреЛрдмреНрдмрд░ рд╣реБрдиреНрдЫ (рджреБрдИ рдкрдЯрдХ рдерд┐рдЪреНрджрд╛ рддреАрди рдЧреБрдгрд╛, рдЖрджрд┐)ред рдХреНрд╖реЗрддреНрд░рдорд╛ рд╢рд┐рд▓рд╛рд▓реЗрдЦ рдЕрднрд┐рдХрд░реНрдордХ рез рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ: "рд╕реЗрдХреЗрдиреНрдб рдЕрднрд┐рдХрд░реНрдордХ 2HCl 72.916 рдПрдХреНрд╕ рдлреЗрд▓рд╛ рдкрд╛рд░реНрдиреБрд╣реЛрд╕реНред"

рдЖрдлреНрдиреЛ рдХрдореНрдкреНрдпреБрдЯрд░ рдХрд┐рдмреЛрд░реНрдбрдорд╛ Enter рдерд┐рдЪреНрдиреБрд╣реЛрд╕реНред рджреЛрд╕реНрд░реЛ рдЕрднрд┐рдХрд░реНрдордХрдХреЛ рдкреНрд░рд╡рд┐рд╖реНрдЯрд┐ рдкреВрд░рд╛ рднрдпреЛ, рд░ рдХреНрдпрд╛рд▓рдХреБрд▓реЗрдЯрд░рд▓реЗ рдЕрдиреБрдкрд╛рддрдмрд╛рдЯ x рдлреЗрд▓рд╛ рдкрд╛рд░реНрдЫ

рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛

рддреНрдпреЛ рд╣рд╛рдореАрд▓реЗ рдЦреЛрдЬреНрди рдЖрд╡рд╢реНрдпрдХ рдерд┐рдпреЛред

рдиреЛрдЯ реи рдирддрд┐рдЬрд╛ рдЕрдиреБрдкрд╛рдд рдХреЛ рдЕрд░реНрде: рд╡рд┐рдШрдЯрди 100.086 рдХреЛ рд▓рд╛рдЧреА Da рдЪрдХрд▓рд╛рдИ 72.916 Da рдПрд╕рд┐рдб рдЪрд╛рд╣рд┐рдиреНрдЫ, рд░ 10 рдЧреНрд░рд╛рдо рдЪрдХрд▓рд╛рдИ рд╡рд┐рдШрдЯрди рдЧрд░реНрди рддрдкрд╛рдИрдВрд▓рд╛рдИ x рдПрд╕рд┐рдб рдЪрд╛рд╣рд┐рдиреНрдЫред

рдиреЛрдЯ реи рд╕рдорд╛рди рд╕рдорд╕реНрдпрд╛рд╣рд░реВрдХреЛ рд╕рдВрдЧреНрд░рд╣:

Khomchenko I. G., рд░рд╕рд╛рдпрди рд╡рд┐рдЬреНрдЮрд╛рди рдорд╛ рд╕рдорд╕реНрдпрд╛ рд░ рдЕрднреНрдпрд╛рд╕ рдХреЛ рд╕рдВрдЧреНрд░рд╣ 2009 (рдЧреНрд░реЗрдб 8-11)ред
рдЦреЛрдордЪреЗрдиреНрдХреЛ рдЬреА.рдкреА., рдЦреЛрдордЪреЗрдиреНрдХреЛ рдЖрдИ.рдЬреА., рд╡рд┐рд╢реНрд╡рд╡рд┐рджреНрдпрд╛рд▓рдпрд╣рд░реВрдорд╛ рдЖрд╡реЗрджрдХрд╣рд░реВрдХрд╛ рд▓рд╛рдЧрд┐ рд░рд╕рд╛рдпрди рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рд╕рдорд╕реНрдпрд╛рд╣рд░реВрдХреЛ рд╕рдЩреНрдХрд▓рди, реирежрезрепред

рдиреЛрдЯ реи рдХрд╛рд░реНрдпрд▓рд╛рдИ рд╕рд░рд▓ рдмрдирд╛рдЙрдирдХреЛ рд▓рд╛рдЧрд┐, рддрдкрд╛рдЗрдБ рдкреНрд░рд╛рд░рдореНрднрд┐рдХ рд╕рдВрд╕реНрдХрд░рдгрдорд╛ рд╕реВрддреНрд░рдХреЛ рдкреНрд░рд╡рд┐рд╖реНрдЯрд┐рд▓рд╛рдИ рд╕рд░рд▓ рдмрдирд╛рдЙрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ рд░ рдХреЗрд╡рд▓ рд╕реВрддреНрд░ рд░реЗрдЦрд╛рдХреЛ рдЕрдиреНрддреНрдпрдорд╛ рддрддреНрд╡ рдкреНрд░рддреАрдХ рдердкреНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫред рддреНрдпрд╕рдкрдЫрд┐ рдХреНрдпрд╛рд▓реНрд╕рд┐рдпрдо рдХрд╛рд░реНрдмреЛрдиреЗрдЯ рдХреЛ рд╕реВрддреНрд░ рд╣реБрдиреЗрдЫ:
CaCOOO
рддрд░ рд░рд╕рд╛рдпрдирд╢рд╛рд╕реНрддреНрд░ рд╢рд┐рдХреНрд╖рдХрд▓реЗ рдпрд╕реНрддреЛ рд░реЗрдХрд░реНрдбрд┐рдЩ рдорди рдкрд░рд╛рдЙрдиреЗ рд╕рдореНрднрд╛рд╡рдирд╛ рдЫреИрдиред рд╕рд╣реА рдкреНрд░рд╡рд┐рд╖реНрдЯрд┐ рдЧрд░реНрди рдЧрд╛рд╣реНрд░реЛ рдЫреИрди - рдпреЛ рдЧрд░реНрдирдХреЛ рд▓рд╛рдЧрд┐ рддрдкрд╛рдИрдВрд▓реЗ рдПрд░реЗ рдердкреНрдиреБ рдкрд░реНрдЫ:

formula : array [1..size] of integer;

рдЬрд╣рд╛рдБ рдЕрдиреБрдХреНрд░рдордгрд┐рдХрд╛ рд░рд╛рд╕рд╛рдпрдирд┐рдХ рддрддреНрд╡рдХреЛ рд╕рдВрдЦреНрдпрд╛ рд╣реЛ, рд░ рдпрд╕ рд╕реВрдЪрдХрд╛рдВрдХрдорд╛ рдорд╛рди рдкрд░рдорд╛рдгреБрд╣рд░реВрдХреЛ рд╕рдВрдЦреНрдпрд╛ рд╣реЛ (рд╕реБрд░реБрдорд╛ рдПрд░реЗрдХрд╛ рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ рд╢реВрдиреНрдпрдорд╛ рд░рд┐рд╕реЗрдЯ рд╣реБрдиреНрдЫрдиреН)ред рд░рд╕рд╛рдпрдирд╢рд╛рд╕реНрддреНрд░рдорд╛ рдЕрдкрдирд╛рдЗрдПрдХрд╛ рд╕реВрддреНрд░рдорд╛ рдкрд░рдорд╛рдгреБрд╣рд░реВ рд▓реЗрдЦрд┐рдПрдХреЛ рдХреНрд░рдорд▓рд╛рдИ рдзреНрдпрд╛рдирдорд╛ рд░рд╛рдЦреНрдиреБрдкрд░реНрдЫред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдереЛрд░реИ рдорд╛рдирд┐рд╕рд╣рд░реВрд▓реЗ O3CaC рд▓рд╛рдИ рдкрдирд┐ рдорди рдкрд░рд╛рдЙрдиреЗрдЫрдиреНред рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓рд╛рдИ рдЬрд┐рдореНрдореЗрд╡рд╛рд░реА рд╣рд╕реНрддрд╛рдиреНрддрд░рдг рдЧрд░реМрдВред рдПрд░реЗ рдмрдирд╛рдЙрдБрджреИ:

 formulaOrder : array [1..size] of integer; // ╨╝╨╛╨╢╨╜╨╛ ╨▓╨╖╤П╤В╤М ╨┐╨╛╨║╨╛╤А╨╛╤З╨╡

рдЬрд╣рд╛рдБ рд╣рд╛рдореА рд╕реВрддреНрд░рдорд╛ рдпрд╕рдХреЛ рдЙрдкрд╕реНрдерд┐рддрд┐рдХреЛ рд╕реВрдЪрдХрд╛рдВрдХ рдЕрдиреБрд╕рд╛рд░ рд░рд╛рд╕рд╛рдпрдирд┐рдХ рддрддреНрд╡рдХреЛ рд╕рдВрдЦреНрдпрд╛ рд▓реЗрдЦреНрдЫреМрдВред рдПрдХ рдкрд░рдорд╛рдгреБ рдердкреНрджреИ currNo рд╕реВрддреНрд░ рдорд╛:

if formula [currNo]=0 then //╤Н╤В╨╛╤В ╨░╤В╨╛╨╝ ╨▓╤Б╤В╤А╨╡╤В╨╕╨╗╤Б╤П ╨┐╨╡╤А╨▓╤Л╨╣ ╤А╨░╨╖
 begin
 orderIndex := orderIndex+1;//╨▓ ╨╜╨░╤З╨░╨╗╨╡ ╨▓╨▓╨╛╨┤╨░ ╤Д╨╛╤А╨╝╤Г╨╗╤Л orderIndex=0
 formulaOrder [orderIndex] :=  currNo;
 end;
formula [currNo]:=formula [currNo]+1;

рд▓рд╛рдЗрдирдорд╛ рд╕реВрддреНрд░ рд▓реЗрдЦреНрджреИ:

s := ''; // ╨┐╤Г╤Б╤В╨░╤П ╤Б╤В╤А╨╛╨║╨░ ╨┤╨╗╤П ╤Д╨╛╤А╨╝╤Г╨╗╤Л
for i:=1 to  orderIndex do // ╨┤╨╗╤П ╨▓╤Б╨╡╤Е ╤Е╨╕╨╝.╤Б╨╕╨╝╨▓╨╛╨╗╨╛╨▓ ╨▓ ╤Д╨╛╤А╨╝╤Г╨╗╨╡ 
 begin
 s:=s+TableSymbols [ formulaOrder[i]];// ╨┤╨╛╨▒╨░╨▓╨╗╤П╨╡╨╝ ╤Е╨╕╨╝.╤Б╨╕╨╝╨▓╨╛╨╗
 if formula [formulaOrder[i]]<>1 then //╨┤╨╛╨▒╨░╨▓╨╗╤П╨╡╨╝ ╨║╨╛╨╗-╨▓╨╛ ╨░╤В╨╛╨╝╨╛╨▓
  s:=s+ intToStr(formula [formulaOrder[i]]);
 end;

рдиреЛрдЯ реи рдХрд┐рдмреЛрд░реНрдбрдмрд╛рдЯ рд╡реИрдХрд▓реНрдкрд┐рдХ рд░реВрдкрдорд╛ рдЕрднрд┐рдХрд░реНрдордХ рд╕реВрддреНрд░ рдкреНрд░рд╡рд┐рд╖реНрдЯ рдЧрд░реНрдиреЗ рдХреНрд╖рдорддрд╛ рдкреНрд░рджрд╛рди рдЧрд░реНрди рдпреЛ рдЕрд░реНрдердкреВрд░реНрдг рдЫред рдпрд╕ рдЕрд╡рд╕реНрдерд╛рдорд╛, рддрдкрд╛рдИрдВрд▓реЗ рдПрдХ рд╕рд╛рдзрд╛рд░рдг рдкрд╛рд░реНрд╕рд░ рд▓рд╛рдЧреВ рдЧрд░реНрди рдЖрд╡рд╢реНрдпрдХ рд╣реБрдиреЗрдЫред

рдпреЛ рдзреНрдпрд╛рди рджрд┐рди рд▓рд╛рдпрдХ рдЫ рдХрд┐:

рдЖрдЬ, рддрд╛рд▓рд┐рдХрд╛рдХреЛ рдзреЗрд░реИ рд╕рдп рд╕рдВрд╕реНрдХрд░рдгрд╣рд░реВ рдЫрдиреН, рд░ рд╡реИрдЬреНрдЮрд╛рдирд┐рдХрд╣рд░реВ рд▓рдЧрд╛рддрд╛рд░ рдирдпрд╛рдБ рд╡рд┐рдХрд▓реНрдкрд╣рд░реВ рдкреНрд░рд╕реНрддрд╛рд╡ рдЧрд░реНрджреИ рдЫрдиреНред (рд╡рд┐рдХрд┐рдкреАрдбрд┐рдпрд╛)

рд╡рд┐рджреНрдпрд╛рд░реНрдереАрд╣рд░реВрд▓реЗ рдкрд╣рд┐рд▓реЗ рдиреИ рдкреНрд░рд╕реНрддрд╛рд╡рд┐рдд рд╡рд┐рдХрд▓реНрдкрд╣рд░реВ рдордзреНрдпреЗ рдХреБрдиреИ рдПрдХрд▓рд╛рдИ рд▓рд╛рдЧреВ рдЧрд░реЗрд░ рд╡рд╛ рдЖрдлреНрдиреИ рдореМрд▓рд┐рдХ рд╡рд┐рдХрд▓реНрдк рдмрдирд╛рдЙрди рдкреНрд░рдпрд╛рд╕ рдЧрд░реЗрд░ рдпрд╕ рджрд┐рд╢рд╛рдорд╛ рдЖрдлреНрдиреЛ рдЪрддреБрд░рддрд╛ рджреЗрдЦрд╛рдЙрди рд╕рдХреНрдЫрдиреНред рдпреЛ рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рди рдкрд╛рда рдХреЛ рд▓рд╛рдЧреА рдХрдо рд╕реЗ рдХрдо рдЙрдкрдпреЛрдЧреА рджрд┐рд╢рд╛ рд╣реЛ рдЬрд╕реНрддреЛ рд▓рд╛рдЧреНрди рд╕рдХреНрдЫред рдпрджреНрдпрдкрд┐, рдпрд╕ рд▓реЗрдЦрдорд╛ рд▓рд╛рдЧреВ рдЧрд░рд┐рдПрдХреЛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛рдХреЛ рд░реВрдкрдорд╛, рдХреЗрд╣реА рд╡рд┐рджреНрдпрд╛рд░реНрдереАрд╣рд░реВрд▓реЗ рдорд╛рдирдХ рдмрдЯрдирд╣рд░реВ рдкреНрд░рдпреЛрдЧ рдЧрд░реЗрд░ рд╡реИрдХрд▓реНрдкрд┐рдХ рд╕рдорд╛рдзрд╛рдирдорд╛ рдирд┐рдпрдиреНрддреНрд░рдг рдХрд╛рд░реНрдбрд╣рд░реВрдХреЛ рдХреБрдиреИ рд╡рд┐рд╢реЗрд╖ рдлрд╛рдЗрджрд╛ рджреЗрдЦреНрди рд╕рдХреНрджреИрдирдиреНред TButtonред рддрд╛рд▓рд┐рдХрд╛рдХреЛ рд╕рд░реНрдкрд┐рд▓ рдЖрдХрд╛рд░ (рдЬрд╣рд╛рдБ рдХрдХреНрд╖рд╣рд░реВ рд╡рд┐рднрд┐рдиреНрди рдЖрдХрд╛рд░рдХрд╛ рд╣реБрдиреНрдЫрдиреН) рдпрд╣рд╛рдБ рдкреНрд░рд╕реНрддрд╛рд╡рд┐рдд рд╕рдорд╛рдзрд╛рдирдХрд╛ рдлрд╛рдЗрджрд╛рд╣рд░реВ рдЕрдЭ рд╕реНрдкрд╖реНрдЯ рд░реВрдкрдорд╛ рджреЗрдЦрд╛рдЙрдиреЗрдЫрдиреНред

рд╡рд┐рджреНрдпрд╛рд▓рдп рдХрдореНрдкреНрдпреБрдЯрд░ рд╡рд┐рдЬреНрдЮрд╛рдирдорд╛ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛
(рдерд┐рдпреЛрдбреЛрд░ рдмреЗрдиреНрдлреЗ рджреНрд╡рд╛рд░рд╛ рддрддреНрд╡рд╣рд░реВрдХреЛ рд╡реИрдХрд▓реНрдкрд┐рдХ рдкреНрд░рдгрд╛рд▓реА, рд╕реНрд░реЛрдд)

рд╣рд╛рдореА рдпреЛ рдкрдирд┐ рдердкреНрдЫреМрдВ рдХрд┐ рдЖрд╡рдзрд┐рдХ рддрд╛рд▓рд┐рдХрд╛рдХреЛ рд▓рд╛рдЧрд┐ рд╣рд╛рд▓реИ рдЕрд╡рд╕реНрдерд┐рдд рдХрдореНрдкреНрдпреБрдЯрд░ рдкреНрд░реЛрдЧреНрд░рд╛рдорд╣рд░реВрдХреЛ рд╕рдВрдЦреНрдпрд╛ рд╣рд╛рд▓реИ рдкреНрд░рдХрд╛рд╢рд┐рдд Habr├й рдорд╛ рд╡рд░реНрдгрди рдЧрд░рд┐рдПрдХреЛ рдЫред рд▓реЗрдЦ.

рдкрд░рд┐рд╢рд┐рд╖реНрдЯ реи: рдлрд┐рд▓реНрдЯрд░рдХрд╛ рд▓рд╛рдЧрд┐ рдХрд╛рд░реНрдпрд╣рд░реВрдХреЛ рдЙрджрд╛рд╣рд░рдгрд╣рд░реВрдлрд┐рд▓реНрдЯрд░рд╣рд░реВ рдкреНрд░рдпреЛрдЧ рдЧрд░реЗрд░ рддрдкрд╛рдИрдВрд▓реЗ рд╕рдорд╛рдзрд╛рди рдЧрд░реНрди рд╕рдХреНрдиреБрд╣реБрдиреНрдЫ, рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдирд┐рдореНрди рдХрд╛рд░реНрдпрд╣рд░реВ:

1) рддрд╛рд▓рд┐рдХрд╛рдорд╛ рдордзреНрдп рдпреБрдЧрдорд╛ рдЬреНрдЮрд╛рдд рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

2) рдЖрд╡рдзрд┐рдХ рдХрд╛рдиреВрдирдХреЛ рдЖрд╡рд┐рд╖реНрдХрд╛рд░рдХреЛ рд╕рдордпрдорд╛ рдерд╛рд╣рд╛ рднрдПрдХрд╛ рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

3) рд░рд╕рд╛рдпрдирд╢рд╛рд╕реНрддреНрд░реАрд╣рд░реВрд▓реЗ рдзрд╛рддреБрд╣рд░реВ рдорд╛рдиреНрдиреЗ рд╕рд╛рдд рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

4) рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реН рдЬреБрди рд╕рд╛рдорд╛рдиреНрдп рдЕрд╡рд╕реНрдерд╛ (n.s) рдЕрдиреНрддрд░реНрдЧрдд рдЧреНрдпрд╛рд╕реАрдп рдЕрд╡рд╕реНрдерд╛рдорд╛ рдЫрдиреНред

5) рддрд░рд▓ рдЕрд╡рд╕реНрдерд╛рдорд╛ рд░рд╣реЗрдХрд╛ рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

6) рдХреБрдиреИ рдареЛрд╕ рдЕрд╡рд╕реНрдерд╛рдорд╛ рд░рд╣реЗрдХрд╛ рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

7) рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реН рдЬреБрди рд╕рд╛рдорд╛рдиреНрдп рдЕрд╡рд╕реНрдерд╛рдорд╛ рдЙрд▓реНрд▓реЗрдЦрдиреАрдп рдкрд░рд┐рд╡рд░реНрддрдирд╣рд░реВ рдмрд┐рдирд╛ рд▓рд╛рдореЛ рд╕рдордпрд╕рдореНрдо рд╣рд╛рд╡рд╛рдХреЛ рд╕рдореНрдкрд░реНрдХрдорд╛ рдЖрдЙрди рд╕рдХреНрдЫред

8) рд╣рд╛рдЗрдбреНрд░реЛрдХреНрд▓реЛрд░рд┐рдХ рдПрд╕рд┐рдбрдорд╛ рдШреБрд▓рдирд╢реАрд▓ рд╕рдмреИ рдзрд╛рддреБрд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

9) рд╕рд▓реНрдлреНрдпреВрд░рд┐рдХ рдПрд╕рд┐рдбрдорд╛ рдШреБрд▓рдирд╢реАрд▓ рд╕рдмреИ рдзрд╛рддреБрд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

10) рддрддрд╛рдЙрдБрджрд╛ рд╕рд▓реНрдлреНрдпреВрд░рд┐рдХ рдПрд╕рд┐рдбрдорд╛ рдШреБрд▓реНрдиреЗ рд╕рдмреИ рдзрд╛рддреБрд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

11) рдирд╛рдЗрдЯреНрд░рд┐рдХ рдПрд╕рд┐рдбрдорд╛ рдШреБрд▓рдирд╢реАрд▓ рд╕рдмреИ рдзрд╛рддреБрд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

12) рдкрд░рд┐рд╡реЗрд╢рдХреЛ рдЕрд╡рд╕реНрдерд╛рдорд╛ рдкрд╛рдиреАрд╕рдБрдЧ рд╣рд┐рдВрд╕реНрд░рдХ рдкреНрд░рддрд┐рдХреНрд░рд┐рдпрд╛ рдЧрд░реНрдиреЗ рд╕рдмреИ рдзрд╛рддреБрд╣рд░реВрд▓рд╛рдИ рдЕрд▓рдЧ рдЧрд░реНрдиреБрд╣реЛрд╕реНред

13) рд╕рдмреИ рдзрд╛рддреБрд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

14) рдкреНрд░рдХреГрддрд┐рдорд╛ рд╡реНрдпрд╛рдкрдХ рднрдПрдХрд╛ рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

15) рдкреНрд░рдХреГрддрд┐рдорд╛ рд╕реНрд╡рддрдиреНрддреНрд░ рдЕрд╡рд╕реНрдерд╛рдорд╛ рдкрд╛рдЗрдиреЗ рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

16) рдорд╛рдирд╡ рд░ рдЬрдирд╛рд╡рд░рдХреЛ рд╢рд░реАрд░рдорд╛ рд╕рдмреИрднрдиреНрджрд╛ рдорд╣рддреНрддреНрд╡рдкреВрд░реНрдг рднреВрдорд┐рдХрд╛ рдЦреЗрд▓реНрдиреЗ рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

17) рджреИрдирд┐рдХ рдЬреАрд╡рдирдорд╛ рд╡реНрдпрд╛рдкрдХ рд░реВрдкрдорд╛ рдкреНрд░рдпреЛрдЧ рд╣реБрдиреЗ рддрддреНрд╡рд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реН (рдирд┐:рд╢реБрд▓реНрдХ рд░реВрдкрдорд╛ рд╡рд╛ рд╕рдВрдпреЛрдЬрдирд╣рд░реВрдорд╛)ред

18) рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реН рдЬреБрдирд╕рдБрдЧ рдХрд╛рдо рдЧрд░реНрди рд╕рдмреИрднрдиреНрджрд╛ рдЦрддрд░рдирд╛рдХ рдЫ рд░ рд╡рд┐рд╢реЗрд╖ рдЙрдкрд╛рдпрд╣рд░реВ рд░ рд╕реБрд░рдХреНрд╖рд╛рддреНрдордХ рдЙрдкрдХрд░рдгрд╣рд░реВ рдЪрд╛рд╣рд┐рдиреНрдЫред

19) рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реН рдЬреБрди, рд╕реНрд╡рддрдиреНрддреНрд░ рд░реВрдкрдорд╛ рд╡рд╛ рдпреМрдЧрд┐рдХрд╣рд░реВрдХреЛ рд░реВрдкрдорд╛, рд╡рд╛рддрд╛рд╡рд░рдгрдХреЛ рд▓рд╛рдЧрд┐ рд╕рдмреИрднрдиреНрджрд╛ рдареВрд▓реЛ рдЦрддрд░рд╛ рд╣реЛред

20) рдмрд╣реБрдореВрд▓реНрдп рдзрд╛рддреБрд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

21) рдмрд╣реБрдореВрд▓реНрдп рдзрд╛рддреБрд╣рд░реВ рднрдиреНрджрд╛ рдорд╣рдБрдЧреЛ рддрддреНрд╡рд╣рд░реВ рдкрд╣рд┐рдЪрд╛рди рдЧрд░реНрдиреБрд╣реЛрд╕реНред

рдЯрд┐рдкреНрдкрдгреАрд╣рд░реВ

1) рдзреЗрд░реИ рдлрд┐рд▓реНрдЯрд░рд╣рд░реВ рдкреНрд░рджрд╛рди рдЧрд░реНрди рдпреЛ рдЕрд░реНрде рдмрдирд╛рдЙрдБрдЫред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдпрджрд┐ рддрдкрд╛рдИрдВрд▓реЗ рд╕рдорд╕реНрдпрд╛ 1 (рдордзреНрдп рдпреБрдЧрдорд╛ рдЬреНрдЮрд╛рдд рд╕рдмреИ рддрддреНрд╡рд╣рд░реВ) рд░ 20 (рдмрд╣реБрдореВрд▓реНрдп рдзрд╛рддреБрд╣рд░реВ) рд╕рдорд╛рдзрд╛рди рдЧрд░реНрди рдлрд┐рд▓реНрдЯрд░ рдЦреЛрд▓реНрдиреБ рднрдпреЛ рднрдиреЗ, рдордзреНрдп рдпреБрдЧрдорд╛ рдЬреНрдЮрд╛рдд рдмрд╣реБрдореВрд▓реНрдп рдзрд╛рддреБрд╣рд░реВ рднрдПрдХрд╛ рдХрдХреНрд╖рд╣рд░реВ рд╣рд╛рдЗрд▓рд╛рдЗрдЯ рд╣реБрдиреЗрдЫрдиреН (рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рд░рдВрдЧрджреНрд╡рд╛рд░рд╛) ( рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдкреНрдпрд╛рд▓реЗрдбрд┐рдпрдо рд╣рд╛рдЗрд▓рд╛рдЗрдЯ рдЧрд░рд┐рдиреЗ рдЫреИрди, 1803 рдорд╛ рдЦреЛрд▓рд┐рдПрдХреЛ рдерд┐рдпреЛ)ред

2) рдзреЗрд░реИ рдлрд┐рд▓реНрдЯрд░рд╣рд░реВ рдкреНрд░рддреНрдпреЗрдХ рдлрд┐рд▓реНрдЯрд░рд▓реЗ рдЖрдлреНрдиреИ рд░рдЩрдХрд╛ рд╕реЗрд▓рд╣рд░реВ рдЪрдпрди рдЧрд░реНрдиреЗ рдореЛрдбрдорд╛ рдХрд╛рдо рдЧрд░реНрдЫ рднрдиреНрдиреЗ рдХреБрд░рд╛ рд╕реБрдирд┐рд╢реНрдЪрд┐рдд рдЧрд░реНрди рдЕрд░реНрдердкреВрд░реНрдг рд╣реБрдиреНрдЫ, рддрд░ рдЕрд░реНрдХреЛ рдлрд┐рд▓реНрдЯрд░рдХреЛ рдЪрдпрдирд▓рд╛рдИ рдкреВрд░реНрдг рд░реВрдкрдорд╛ рд╣рдЯрд╛рдЙрдБрджреИрди (рдПрдЙрдЯрд╛ рд░рдЩрдорд╛ рд╕реЗрд▓рдХреЛ рднрд╛рдЧ, рдЕрд░реНрдХреЛрдорд╛ рднрд╛рдЧ)ред рддреНрдпрд╕рдкрдЫрд┐, рдЕрдШрд┐рд▓реНрд▓реЛ рдЙрджрд╛рд╣рд░рдгрдХреЛ рдорд╛рдорд▓рд╛рдорд╛, рдордзреНрдп рдпреБрдЧ рд░ рдмрд╣реБрдореВрд▓реНрдп рдзрд╛рддреБрд╣рд░реВрдорд╛ рдкрддреНрддрд╛ рд▓рдЧрд╛рдЗрдПрдХрд╛ рд╕реЗрдЯрд╣рд░реВрдХреЛ рдкреНрд░рддрд┐рдЪреНрдЫреЗрджрдирдХрд╛ рддрддреНрд╡рд╣рд░реВ, рд╕рд╛рдереИ рдкрд╣рд┐рд▓реЛ рд░ рдХреЗрд╡рд▓ рджреЛрд╕реНрд░реЛ рд╕реЗрдЯрд╣рд░реВрдорд╛ рдорд╛рддреНрд░ рд╕рдореНрдмрдиреНрдзрд┐рдд рддрддреНрд╡рд╣рд░реВ рджреЗрдЦрд┐рдиреЗрдЫрдиреНред рддреАред рдордзреНрдп рдпреБрдЧрдорд╛ рдЕрдЬреНрдЮрд╛рдд рдмрд╣реБрдореВрд▓реНрдп рдзрд╛рддреБрд╣рд░реВ, рд░ рдордзреНрдп рдпреБрдЧрдорд╛ рдЬреНрдЮрд╛рдд рддрддреНрд╡рд╣рд░реВ рддрд░ рдмрд╣реБрдореВрд▓реНрдп рдзрд╛рддреБрд╣рд░реВ рд╣реЛрдЗрдирдиреНред

3) рдкреНрд░рд╛рдкреНрдд рдкрд░рд┐рдгрд╛рдорд╣рд░реВрдХреЛ рд╕рд╛рде рдЕрдиреНрдп рдХрд╛рдордХреЛ рд╕рдореНрднрд╛рд╡рдирд╛ рд╕реБрдирд┐рд╢реНрдЪрд┐рдд рдЧрд░реНрди рдлрд┐рд▓реНрдЯрд░ рд▓рд╛рдЧреВ рдЧрд░реЗрдкрдЫрд┐ рдпреЛ рдЕрд░реНрдердкреВрд░реНрдг рд╣реБрдиреНрдЫред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдордзреНрдп рдпреБрдЧрдорд╛ рдЪрд┐рдирд┐рдиреЗ рдЪрдпрди рдЧрд░рд┐рдПрдХрд╛ рддрддреНрд╡рд╣рд░реВ рднрдПрдХрд╛рд▓реЗ, рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓реЗ рдЪрдпрди рдЧрд░рд┐рдПрдХреЛ рддрддреНрд╡рдорд╛ LMB рдХреНрд▓рд┐рдХ рдЧрд░реНрдЫ рд░ рдпрд╕ рддрддреНрд╡рдХреЛ рдмрд╛рд░реЗрдорд╛ рд╡рд┐рдХрд┐рдкрд┐рдбрд┐рдпрд╛ рд▓реЗрдЦрдорд╛ рд▓рдЧрд┐рдиреНрдЫред

4) рдЪрдпрди рдЧрд░рд┐рдПрдХреЛ рддрд╛рд▓рд┐рдХрд╛ рдХрдХреНрд╖рдорд╛ LMB рдорд╛ рдХреНрд▓рд┐рдХ рдЧрд░реЗрд░ рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓рд╛рдИ рдЪрдпрди рд░рджреНрдж рдЧрд░реНрдиреЗ рдХреНрд╖рдорддрд╛ рдкреНрд░рджрд╛рди рдЧрд░реНрди рдпреЛ рдЕрд░реНрдердкреВрд░реНрдг рд╣реБрдиреНрдЫред рдЙрджрд╛рд╣рд░рдгрдХрд╛ рд▓рд╛рдЧрд┐, рдкрд╣рд┐рд▓реЗ рдиреИ рд╣реЗрд░рд┐рдПрдХрд╛ рд╡рд╕реНрддреБрд╣рд░реВ рд╣рдЯрд╛рдЙрдиред

5) рдЪрдпрди рдЧрд░рд┐рдПрдХрд╛ рдХрдХреНрд╖рд╣рд░реВрдХреЛ рд╕реВрдЪреА рдлрд╛рдЗрд▓рдорд╛ рд╕реБрд░рдХреНрд╖рд┐рдд рдЧрд░рд┐рдПрдХреЛ рдЫ рд░ рдпрд╕реНрддреЛ рдлрд╛рдЗрд▓ рдХрдХреНрд╖рд╣рд░реВрдХреЛ рд╕реНрд╡рдЪрд╛рд▓рд┐рдд рдЪрдпрдирдХреЛ рд╕рд╛рде рд▓реЛрдб рдЧрд░рд┐рдПрдХреЛ рдЫ рднрдиреА рд╕реБрдирд┐рд╢реНрдЪрд┐рдд рдЧрд░реНрди рдпреЛ рдЕрд░реНрдердкреВрд░реНрдг рд╣реБрдиреНрдЫред рдпрд╕рд▓реЗ рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓рд╛рдИ рдХрд╛рдордмрд╛рдЯ рд╡рд┐рд╢реНрд░рд╛рдо рд▓рд┐рдиреЗ рдЕрд╡рд╕рд░ рджрд┐рдиреЗрдЫред

рд╣рд╛рдореАрд▓реЗ рдПрдХ рд╕реНрдерд┐рд░, рдкреВрд░реНрд╡рдирд┐рд░реНрдзрд╛рд░рд┐рдд рдирд┐рдпрдиреНрддреНрд░рдг рдирдХреНрд╕рд╛ рдкреНрд░рдпреЛрдЧ рдЧрд░реНрдпреМрдВ, рддрд░ рддреНрдпрд╣рд╛рдБ рдзреЗрд░реИ рдорд╣рддреНрддреНрд╡рдкреВрд░реНрдг рдХрд╛рд░реНрдпрд╣рд░реВ рдЫрдиреН рдЬрд╣рд╛рдБ рдЧрддрд┐рд╢реАрд▓ рдирд┐рдпрдиреНрддреНрд░рдг рдирдХреНрд╕рд╛рд╣рд░реВ рдЬреБрди рдХрд╛рд░реНрдпрдХреНрд░рдо рдЪрд▓рд┐рд░рд╣реЗрдХреЛ рд░реВрдкрдорд╛ рдкрд░рд┐рд╡рд░реНрддрди рд╣реБрдиреНрдЫрдиреН рдкреНрд░рдпреЛрдЧ рдЧрд░реНрди рд╕рдХрд┐рдиреНрдЫред рдПрдЙрдЯрд╛ рдЙрджрд╛рд╣рд░рдг рдЧреНрд░рд╛рдл рд╕рдореНрдкрд╛рджрдХ рд╣реБрдиреЗрдЫ, рдЬрд╕рдорд╛ рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓реЗ рд╕рдЮреНрдЭреНрдпрд╛рд▓рдорд╛ рдареЗрдЧрд╛рдирд╛рд╣рд░реВрдХреЛ рд╕реНрдерд┐рддрд┐ рд╕рдВрдХреЗрдд рдЧрд░реНрди рд░ рддрд┐рдиреАрд╣рд░реВрдХреЛ рдмреАрдЪрдорд╛ рдХрд┐рдирд╛рд░рд╣рд░реВ рдХреЛрд░реНрди рдорд╛рдЙрд╕ рдкреНрд░рдпреЛрдЧ рдЧрд░реНрджрдЫред рдард╛рдбреЛ рд╡рд╛ рдХрд┐рдирд╛рд░рд╛ рдореЗрдЯрд╛рдЙрдирдХреЛ рд▓рд╛рдЧрд┐, рдкреНрд░рдпреЛрдЧрдХрд░реНрддрд╛рд▓реЗ рдпрд╕рд▓рд╛рдИ рдЗрдВрдЧрд┐рдд рдЧрд░реНрдиреБрдкрд░реНрдЫред рддрд░ рдпрджрд┐ рд╕рд░реНрдХрд▓рдХреЛ рд╕рд╛рде рдЪрд┐рдиреНрд╣ рд▓рдЧрд╛рдЗрдПрдХреЛ vertex рд▓рд╛рдИ рджреЗрдЦрд╛рдЙрди рдПрдХрджрдо рд╕рдЬрд┐рд▓реЛ рдЫ рднрдиреЗ, рдкрд╛рддрд▓реЛ рд░реЗрдЦрд╛рд▓реЗ рдХреЛрд░рд┐рдПрдХреЛ рдХрд┐рдирд╛рд░рд╛рд▓рд╛рдИ рджреЗрдЦрд╛рдЙрди рдЕрдЭ рдЧрд╛рд╣реНрд░реЛ рд╣реБрдиреЗрдЫред рдПрдЙрдЯрд╛ рдирд┐рдпрдиреНрддреНрд░рдг рдирдХреНрд╕рд╛рд▓реЗ рдпрд╣рд╛рдБ рдорджреНрджрдд рдЧрд░реНрдиреЗрдЫ, рдЬрд╣рд╛рдБ рдард╛рдбреЛ рд░ рдХрд┐рдирд╛рд░рд╛рд╣рд░реВрд▓реЗ рджреГрд╢реНрдп рдЪрд┐рддреНрд░рдорд╛ рднрдиреНрджрд╛ рдлрд░рд╛рдХрд┐рд▓реЛ рдЫрд┐рдореЗрдХрд╣рд░реВ рдУрдЧрдЯреЗрдХрд╛ рдЫрдиреНред

рдЬрдЯрд┐рд▓ рдкреНрд░рд╢рд┐рдХреНрд╖рдгрдХреЛ рдпрд╕ рд╡рд┐рдзрд┐рд╕рдБрдЧ рд╕рдореНрдмрдиреНрдзрд┐рдд рдПрдЙрдЯрд╛ рдЪрд╛рдЦрд▓рд╛рдЧреНрджреЛ рдкрдХреНрд╖ рдкреНрд░рд╢реНрди рд╣реЛ: рдХреЗ рдпреЛ рд╡рд┐рдзрд┐ рдПрдЖрдИ рдкреНрд░рд╢рд┐рдХреНрд╖рдгрдорд╛ рдЙрдкрдпреЛрдЧреА рд╣реБрди рд╕рдХреНрдЫ?

рд╕реНрд░реЛрдд: www.habr.com

рдПрдХ рдЯрд┐рдкреНрдкрдгреА рдердкреНрди