1975 рдореЗрдВ рдЙрдЪреНрдЪ рд╕реНрддрд░реАрдп рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдВрдЧ

1975 рдХреЗ рджрд╢рдХ рдореЗрдВ, IBM 5100 PC, BASIC рдпрд╛ APL рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдВрдЧ рднрд╛рд╖рд╛рдУрдВ рдХреЗ рд╕рд╛рде рд╡реЗрд░рд┐рдПрдВрдЯ рдореЗрдВ рдЖрдпрд╛ред рдЬреИрд╕рд╛ рдХрд┐ рдЖрдк рдЕрдиреБрдорд╛рди рд▓рдЧрд╛ рд╕рдХрддреЗ рд╣реИрдВ, рдЕрдВрдд рдореЗрдВ рдореБрдЦреНрдп рдЬреЛрд░ рдЗрд╕ рддрдереНрдп рдХреЗ рдХрд╛рд░рдг рдмреЗрд╕рд┐рдХ рджреБрднрд╛рд╖рд┐рдпрд╛ рдкрд░ рд░рдЦрд╛ рдЧрдпрд╛ рдерд╛ рдХрд┐ рдЬрдм рдирд┐рд░реНрдгрдп рд▓реЗрдирд╛ рд╣реИ рдХрд┐ рдХреНрдпрд╛ рдЦрд░реАрджрдирд╛ рд╣реИ, рддреЛ рдпрд╣ рдЗрд╕ рдкреАрд╕реА рдХреЗ рдЙрдкрдпреЛрдЧрдХрд░реНрддрд╛рдУрдВ рдХреЛ рдЕрдзрд┐рдХ рд╕рдордЭ рдореЗрдВ рдЖрддрд╛ рдерд╛, рдФрд░ рдПрдкреАрдПрд▓ рдХреЛ рдПрдХ рдирд┐рд╢реНрдЪрд┐рдд рдиреНрдпреВрдирддрдо рд╕реНрддрд░ рдХреА рдкреНрд░рд╡рд┐рд╖реНрдЯрд┐ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рдереАред рд╡реЗ рдХрд╣рддреЗ рд╣реИрдВ рдХрд┐ рдЧреИрд░-рдРрд╕реНрдХреА рдкрд╛рддреНрд░реЛрдВ рдХреЗ рдХрд╛рд░рдг рдПрдкреАрдПрд▓ рдиреЗ рд▓реЛрдХрдкреНрд░рд┐рдпрддрд╛ рдЦреЛ рджреА рд╣реИ, рд╢рд╛рдпрдж рдпрд╣ рдЖрдВрд╢рд┐рдХ рд░реВрдк рд╕реЗ рд╕рдЪ рд╣реИ, рд▓реЗрдХрд┐рди рдпрд╣ 75 рдореАрдЯрд░ рдкрд░ рдирд╣реАрдВ рд╣реБрдЖред

рд╢рд╛рдпрдж рдкреНрд░реЛрдЧреНрд░рд╛рдорд┐рдВрдЧ рднрд╛рд╖рд╛рдУрдВ рдХрд╛ рдЗрддрд┐рд╣рд╛рд╕ рдереЛрдбрд╝рд╛ рдЕрд▓рдЧ рд╣реЛ рдЬрд╛рддрд╛ рдЕрдЧрд░ рд╡рд┐рдХрд╛рд╕ рдПрдкреАрдПрд▓ рджреБрднрд╛рд╖рд┐рдпрд╛ рдкрд░ рдЬреЛрд░ рджреЗрдиреЗ рдХреЗ рд╕рд╛рде рдЪрд▓рд╛ рдЧрдпрд╛ рд╣реЛрддрд╛, рд▓реЗрдХрд┐рди рдЖрдк рдХреЗрд╡рд▓ рдЗрд╕рдХреЗ рдмрд╛рд░реЗ рдореЗрдВ рдХрд▓реНрдкрдирд╛ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ, рдЗрд╕рд▓рд┐рдП рдореИрдВ рд╕рд┐рд░реНрдл рдпрд╣ рджреЗрдЦрдиреЗ рдХрд╛ рд╕реБрдЭрд╛рд╡ рджреЗрддрд╛ рд╣реВрдВ рдХрд┐ 1975 рдХреЗ рджрд╢рдХ рдореЗрдВ рдХреИрд╕реЗ рдХрд╛рд░реНрдпрдХреНрд░рдо рд▓рд┐рдЦреЗ рдЧрдП рдереЗред

5 рдорд┐рдирдЯ рддрдХ рд╕рд░рд▓ рдЧрдгрд┐рддред


рдЪрд░рд┐рддреНрд░ рд╡рд┐рд╡рд░рдг:
├Ч - рдПрдХрд╛рдзрд┐рдХ
Ide - рд╡рд┐рднрд╛рдЬрд┐рдд рдХрд░рдирд╛
/ - рдпрд╣ foldr1 рд╣реИ
┬п123 рдПрдХ рдЛрдгрд╛рддреНрдордХ рд╕рдВрдЦреНрдпрд╛ рд╣реИ
тЖР - рдкрд░рд┐рднрд╛рд╖рд┐рдд
Or - рд╕реВрдЪрдХрд╛рдВрдХ рдЬрдирд░реЗрдЯрд░ рдпрд╛ рд╕реВрдЪрдХрд╛рдВрдХ рдЦреЛрдЬ
тЖС - рд▓реЗрдирд╛
тЖУ - рдбреНрд░реЙрдк
тИз - рдФрд░
тИи - рдпрд╛
тМИ - рдЕрдзрд┐рдХрддрдо
Res - рдЖрдХрд╛рд░, рдЖрдХрд╛рд░, рдЖрдпрд╛рдо
ред - рдЖрдВрддрд░рд┐рдХ рдЙрддреНрдкрд╛рдж, рдЕрд░реНрдерд╛рддреНред рдореИрдЯреНрд░рд┐рдХреНрд╕ рдХреЗ рдорд╛рдорд▓реЗ рдореЗрдВ, рдПрдХ рддрд░реНрдХ рдХреЗ 0 рдЖрдпрд╛рдо рдФрд░ рджреВрд╕рд░реЗ рдХреЗ рд╕рдмрд╕реЗ рдмрдбрд╝реЗ рдЖрдпрд╛рдо рдХреЛ рдорд┐рд▓рд╛рддрд╛ рд╣реИ - рдЗрд╕рдХреЗ рдкрд░рд┐рдгрд╛рдорд╕реНрд╡рд░реВрдк рдПрдХ рдХреА рдкрдВрдХреНрддрд┐рдпреЛрдВ рдХреЗ рд╕рд╛рде рджреВрд╕рд░реЗ рдХрд╛ рд╕реНрддрдВрдн рд╣реЛрддрд╛ рд╣реИред V fg W -> (V1 g W1) f (Vn g Wn)
тИШред - рдмрд╛рд╣рд░реА рдЙрддреНрдкрд╛рдж, рдЕрд░реНрдерд╛рддреНред рдкреНрд░рддреНрдпреЗрдХ рддрд░реНрдХ рдХреЗ рд▓рд┐рдП рд╕рдВрдпреЛрдЬрди рдкрд░рд┐рдгрд╛рдо
рд╡рд╛рдИ [рдПрди] - рдПрди 'рддрддреНрд╡ рдкреНрд░рд╛рдкреНрдд рдХрд░реЗрдВ, рдЖрдк рдПрди рдХреЛ рд╡рд┐рднрд┐рдиреНрди рд╕реНрддрд░реЛрдВ рдХреЗ рдорд╛рдзреНрдпрдо рд╕реЗ рдирд┐рд░реНрджрд┐рд╖реНрдЯ рдХрд░ рд╕рдХрддреЗ рд╣реИрдВ;


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


All Articles