рдЖрд░рдЬреАрдмреА
рдХрдВрдкреНрдпреВрдЯрд░ рдЧреНрд░рд╛рдлрд┐рдХреНрд╕ рдореЗрдВ рд░рдВрдЧ рдкреНрд░рддрд┐рдирд┐рдзрд┐рддреНрд╡ рдХреЗ рдореБрдЦреНрдп рддрд░реАрдХреЛрдВ рдореЗрдВ рд╕реЗ рдПрдХ рдЖрд░рдЬреАрдмреА рдореЛрдб рд╣реИ - рд▓рд╛рд▓, рд╣рд░реЗ рдФрд░ рдиреАрд▓реЗ рд░рдВрдЧ рдХрд╛ рдорд┐рд╢реНрд░рдгред рдХрд┐рд╕реА рднреА рд░рдВрдЧ рдХреЛ рдирд┐рд░реНрджрд┐рд╖реНрдЯ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП, 0 рд╕реЗ 255 рд╕реЗ рддреАрди рдЪрд░ рдЖрд░, рдЬреА, рдмреА рддрдХ рдорд╛рди рдирд┐рд░реНрджрд┐рд╖реНрдЯ рдХрд░рдирд╛ рдЖрд╡рд╢реНрдпрдХ рд╣реИред рдЗрд╕ рдкреНрд░рдХрд╛рд░, рдЖрдк рдХрд┐рд╕реА рднреА рд░рдВрдЧ, рдХрд┐рд╕реА рднреА рдЪрдордХ рдХрд╛ рд░рдВрдЧ рдкреНрд░рд╛рдкреНрдд рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред
рдХреБрдЫ рдЖрд░рдЬреАрдмреА рд░рдВрдЧ
тАв (255,0,0)

тАв (0.255.0)

тАв (255,255,0)

тАв (0,0,255)

тАв (0,255,255)

тАв (255,0,255)

рд░рдВрдЧ рдХрд╛ рднреМрддрд┐рдХ рдкреНрд░рддрд┐рдирд┐рдзрд┐рддреНрд╡
рдкреНрд░рдХрд╛рд╢ рдПрдХ рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдХреЗ рдЕрдВрддрд░рд╛рд▓ рдХреЗ рд╕рд╛рде рдПрдХ рдИ / рдореА рд▓рд╣рд░ рд╣реИ: 380-760 рдПрдирдПрдоред
рдЗрд╕ рд▓реЗрдЦ рдореЗрдВ, рд╣рдо рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ рдкреНрд░рдХрд╛рд╢ рдХреЗ рдкреНрд░рддрд┐рдирд┐рдзрд┐рддреНрд╡ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░реЗрдВрдЧреЗред
рднреМрддрд┐рдХ рдЯрд┐рдкреНрдкрдгрд┐рдпреЛрдВ рд╕реЗ рдпрд╣ рдЬреНрдЮрд╛рдд рд╣реИ рдХрд┐ рд▓рд╛рд▓ рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рд░реЗрдВрдЬ (610; 760), рдирд╛рд░рдВрдЧреА - (590; 610), рдкреАрд▓рд╛ - (570, 590), рд╣рд░рд╛ - (540, 570), рдиреАрд▓рд╛ - (510; 540) рдореЗрдВ рдирд┐рд╣рд┐рдд рд╣реИред рдиреАрд▓рд╛ - (480; 510), рдмреИрдВрдЧрдиреА - (380; 480) рдПрдирдПрдоред
рдпрджрд┐ рдЖрдк рджреГрд╢реНрдпрдорд╛рди рд╡рд┐рдХрд┐рд░рдг рдХреЗ рдирд┐рд░рдВрддрд░ рд╕реНрдкреЗрдХреНрдЯреНрд░рдо рдХреЛ рджреЗрдЦрддреЗ рд╣реИрдВ, рддреЛ рдЖрдк рдЙрд╕ рдкрд░ рдХреБрдЫ рд░рдВрдЧреЛрдВ рдХреЛ рдЙрдЬрд╛рдЧрд░ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ, рдЬрд┐рд╕рдХреЗ рдмреАрдЪ рдПрдХ рдЪрд┐рдХрдиреА рд╕рдВрдХреНрд░рдордг рд╣реЛрддрд╛ рд╣реИред

рдЗрд╕рд▓рд┐рдП, рд╣рдорд╛рд░реА рд╡рд┐рдзрд┐ рдореЗрдВ, рдкреНрд░рдпреЛрдЧрд╛рддреНрдордХ рдбреЗрдЯрд╛ рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ, рд╣рдо рдпрд╣ рдирд┐рд░реНрдзрд╛рд░рд┐рдд рдХрд░рддреЗ рд╣реИрдВ рдХрд┐ рдЗрдирдкреБрдЯ рдЕрдВрддрд░рд╛рд▓ рдХрд┐рд╕ рд░рдВрдЧ рдХреЗ рдЕрдВрддрд░рд╛рд▓ рдореЗрдВ рд╕реНрдерд┐рдд рд╣реИ, рдФрд░ рдлрд┐рд░ рдкреНрд░рд╛рдкреНрдд рдЕрдиреБрднрд╡рдЬрдиреНрдп рдЕрдиреБрдкрд╛рдд рд╕реЗ рдЗрд╕реЗ RGB рдореЛрдб рдореЗрдВ рд╕реНрд╡рд┐рдЪ рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИред
рд╣рд░реЗ рд░рдВрдЧ рдХреЗ рд▓рд┐рдП рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдХреЛ рдЖрд░рдЬреАрдмреА рдореЗрдВ рдкрд░рд┐рд╡рд░реНрддрд┐рдд рдХрд░рдиреЗ рдкрд░ рд╡рд┐рдЪрд╛рд░ рдХрд░реЗрдВред рд╣рдо рдЬрд╛рдирддреЗ рд╣реИрдВ рдХрд┐ рд╣рд░рд╛ рд░рдВрдЧ рд╕реАрдорд╛ (540; 570) рдореЗрдВ рд╣реИред рдорд╛рди рд▓реАрдЬрд┐рдП рдХрд┐ рдЕрд╕рд▓реА рд╣рд░рд╛ рд░рдВрдЧ рдЗрд╕ рдЕрдВрддрд░рд╛рд▓ рдХреЗ рдХреЗрдВрджреНрд░ рдореЗрдВ рдкрдбрд╝реЗ рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдкрд░ рдкрдбрд╝рддрд╛ рд╣реИ: 555 рдПрдирдПрдоред рдЗрд╕рд▓рд┐рдП, RGB рдореЛрдб рдореЗрдВ рджрд┐рдП рдЧрдП рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдкрд░, рдпрд╣ рдЗрд╕ рддрд░рд╣ рджрд┐рдЦреЗрдЧрд╛ (0.255.0)ред рдмрдврд╝рддреА рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдХреЗ рд╕рд╛рде, рд╣рд░реЗ рд░рдВрдЧ рдХрд╛ рд░рдВрдЧ рд╕реБрдЪрд╛рд░реВ рд░реВрдк рд╕реЗ рдкреАрд▓реЗ (255,255,0) рдореЗрдВ рдмрджрд▓ рдЬрд╛рддрд╛ рд╣реИред рдЗрди рджреЛ рд░рдВрдЧреЛрдВ рдХреА рд╕реАрдорд╛ рдкрд░ рдЕрд░реНрдерд╛рддреН 570 рдПрдирдПрдо рдХреЗ рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ, RGB рдкреНрд░рддрд┐рдирд┐рдзрд┐рддреНрд╡ (127,255.0) рдЬреИрд╕рд╛ рджрд┐рдЦреЗрдЧрд╛ред рдЗрд╕ рдЕрдВрддрд░рд╛рд▓ рдХреЗ рд▓рд┐рдП, рдЖрдк рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рд╕реЗ рдЖрд░рдЬреАрдмреА рдореЛрдб рдореЗрдВ рд▓рд╛рд▓, рд╣рд░реЗ, рдиреАрд▓реЗ рд░рдВрдЧ рдХреА рдорд╛рддреНрд░рд╛ рдореЗрдВ рд╕рдВрдХреНрд░рдордг рдХреЗ рд▓рд┐рдП рд╕реВрддреНрд░ рд▓рд┐рдЦ рд╕рдХрддреЗ рд╣реИрдВред
рд╕рдВрдХреЗрддрд┐рдд рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдЕрдВрддрд░рд╛рд▓ рдХреА рд╕реАрдорд╛рдУрдВ рдХрд╛ рд╡рд┐рд╢реНрд▓реЗрд╖рдг рдХрд░рддреЗ рд╣реБрдП, рдЖрдк рджреЗрдЦ рд╕рдХрддреЗ рд╣реИрдВ рдХрд┐ рдиреАрд▓рд╛ рдШрдЯрдХ рдЗрд╕рдореЗрдВ рдореМрдЬреВрдж рдирд╣реАрдВ рд╣реИ, рдЗрд╕рд▓рд┐рдП рдЖрдк рддреБрд░рдВрдд рд▓рд┐рдЦ рд╕рдХрддреЗ рд╣реИрдВ: рдмреА = 0ред рдпрд╣ рднреА рджреЗрдЦрд╛ рдЬрд╛рддрд╛ рд╣реИ рдХрд┐ рдЧреНрд░реАрди рдШрдЯрдХ G = 255 рдирд╣реАрдВ рдмрджрд▓рддрд╛ рд╣реИред рд▓реЗрдХрд┐рди рд▓рд╛рд▓ рдШрдЯрдХ рдХреЗ рд▓рд┐рдП рд╣рдо R = [127.5 * (рд▓рдВрдмреЛ -555) / (570-555)] рд▓рд┐рдЦрддреЗ рд╣реИрдВ, рдЬрд╣рд╛рдВ [] рдкреВрд░реНрдгрд╛рдВрдХ рднрд╛рдЧ рдХреЛ рдирд┐рдХрд╛рд▓рдиреЗ рдХрд╛ рд╕рдВрдЪрд╛рд▓рди рд╣реЛрддрд╛ рд╣реИред рдирд┐рд░реНрднрд░рддрд╛ рдирд┐рд░реНрдорд╛рдг рдХреЗ рдЕрд░реНрде рдХреЛ рд╕рдВрд░рдХреНрд╖рд┐рдд рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдЕрднрд┐рд╡реНрдпрдХреНрддрд┐ рдХреЛ рд╕рд░рд▓ рдирд╣реАрдВ рдХрд┐рдпрд╛ рдЧрдпрд╛ рд╣реИред
рдЬрдм рддрд░рдВрдЧ рджреИрд░реНрдзреНрдп рдЕрдВрддрд░рд╛рд▓ (540.555) рдореЗрдВ рдЧрд┐рд░рддрд╛ рд╣реИ, рддреЛ рд╣рд░рд╛ рд░рдВрдЧ рд╕реБрдЪрд╛рд░реВ рд░реВрдк рд╕реЗ рдиреАрд▓реЗ рд░рдВрдЧ рдореЗрдВ рдмрджрд▓ рдЬрд╛рддрд╛ рд╣реИред
рдЗрд╕ рдЕрдВрддрд░рд╛рд▓ рдХреА рдмрд╛рдИрдВ рд╕реАрдорд╛ рдкрд░, RGB рдореЛрдб рдореЗрдВ рд░рдВрдЧ рдХрд╛ рд░реВрдк рд╣реИ: (0.255.127)ред рдмрд╛рдПрдВ (0.255.127) рдФрд░ рджрд╛рдПрдВ (0.255.0) рдЕрдВрддрд░рд╛рд▓ рдХреА рд╕реАрдорд╛ рдХреА рддреБрд▓рдирд╛ рдореЗрдВ, рд╣рдорд╛рд░реЗ рдкрд╛рд╕ R = 0, G = 255 рд╣реИ
рдФрд░ рдиреАрд▓реЗ рдШрдЯрдХ (B) рдХреА рдорд╛рддреНрд░рд╛ 127 рд╕реЗ рдШрдЯрдХрд░ 0. 0. рд╣реЛ рдЬрд╛рддреА рд╣реИред рд╕рдВрдХреНрд░рдордг рдирд┐рдореНрдирд▓рд┐рдЦрд┐рдд рд╕реВрддреНрд░ рдХреЗ рдЕрдиреБрд╕рд╛рд░ рдХрд┐рдпрд╛ рдЬрд╛ рд╕рдХрддрд╛ рд╣реИ: R = [127.5 * (1- (рд▓рдордбрд╛-540) / (555-540)]
рдЙрдкрд░реЛрдХреНрдд рд╕рд┐рджреНрдзрд╛рдВрдд рдХрд╛ рдЙрдкрдпреЛрдЧ рдХрд░рдХреЗ, рд╣рдо рд╕реНрдкреЗрдХреНрдЯреНрд░рдо рдХреЗ рд╕рднреА рдЕрдВрддрд░рд╛рд▓ рдХреЗ рд▓рд┐рдП рд╕рдВрдХреНрд░рдордг рд╕реВрддреНрд░ рдкреНрд░рд╛рдкреНрдд рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ, рдФрд░ рдЙрдиреНрд╣реЗрдВ рдкреНрд░рддреНрдпреЗрдХ рдШрдЯрдХ рдХреЗ рд▓рд┐рдП рдХрд╛рд░реНрдпреЛрдВ рдХреЗ рд░реВрдк рдореЗрдВ рд▓рд╛рдЧреВ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВред
рдХрд╛рд░реНрдпрд╛рдиреНрд╡рдпрди
function Red(l:integer):byte; var n:byte; begin if (l>560)and(l<=760) then n:=255; if (l>495)and(l<=555) then n:=0; if (l>570)and(l<=580) then n:=round(127.5+127.5*(l-570)/10); if (l>555)and(l<=570) then n:=round(127.5*(l-555)/15); if (l>480)and(l<=495) then n:=round(127.5-127.5*(l-480)/15); if (l>380)and(l<=480) then n:=round(255-127.5*(l-380)/100); Red:=n; end; function Blue(l:integer):byte; var n:byte; begin if (l>380)and(l<=525) then n:=255; if (l>555)and(l<=760) then n:=0; if (l>540)and(l<=555) then n:=round(127.5-127.5*(l-540)/15); if (l>525)and(l<=540) then n:=round(255-127.5*(l-525)/15); Blue:=n; end; function Green(l:integer):byte; var n:byte; begin if (l>525)and(l<=580) then n:=255; if (l>380)and(l<=495) then n:=0; if (l>610)and(l<=760) then n:=round(63.5-63.5*(l-610)/150); if (l>600)and(l<=610) then n:=round(127.5-63.5*(l-600)/10); if (l>590)and(l<=600) then n:=round(190.5-63.5*(l-590)/10); if (l>580)and(l<=590) then n:=round(255-63.5*(l-580)/10); if (l>495)and(l<=510) then n:=round(127.5*(l-495)/15); if (l>510)and(l<=525) then n:=round(127.5+127.5*(l-510)/15); Green:=n; end; procedure TForm1.FormDblClick(Sender: TObject); var n,k:integer; begin for k:=20 to 360 do for n:=760 to 1520 do form1.Canvas.pixels[n-760,k]:= RGB(Red(round(n/2)),Green(round(n/2)),Blue(round(n/2))); end; ...
рдкрд░рд┐рдгрд╛рдо рдиреАрдЪреЗ рджрд┐рдЦрд╛рдП рдЧрдП рд╣реИрдВ:

рдирд┐рд░реНрдорд╛рдг рдХреЗ рд▓рд┐рдП рдХреБрдЫ рд╢рд░реНрддреЛрдВ рдХреЛ рд▓рд╛рдЧреВ рдХрд░рддреЗ рд╣реБрдП, рдПрдХ рд╣рд╛рдЗрдбреНрд░реЛрдЬрди рдкрд░рдорд╛рдгреБ рдХреЗ рдЙрддреНрд╕рд░реНрдЬрди рдХреЗ рд╕реНрдкреЗрдХреНрдЯреНрд░рдо рдХреЛ рдкреНрд░рд╛рдкреНрдд рдХрд░ рд╕рдХрддрд╛ рд╣реИ:
