\input style \chapter{7 ฏฅเฅแฌฎโเฅญญ๋ฉ  ซฃฎเจโฌ ฅขชซจค } เˆ‘Š“Ÿ €‘Š“—ˆ’œ ŒŽˆŒ —ˆ’€’…‹ŸŒ, Ÿ Ž‘‚Ÿ™“ e™… Ž„“ ƒ‹€‚“ €‹ƒŽˆ’Œ“ ฅ‚Š‹ˆ„€. ฏŽ‹€ƒ€ž, —’Ž Š ’ŽŒ“ ‚…Œ…ˆ …ŠŽ’Ž›… ˆ‡ —ˆ’€’…‹…‰ “†… ‡€ŠŽ„ˆ“ž’ …ƒŽ ‚ ‚ˆ„… \prg x, y:=X, Y; \.{do} x\not=y \to \.{if} x>y \to x:=x-y \wbox y>x \to y:=y-x \.{od}; \var{…—€’€’œ}(x) \grp ƒ„… …„Ž•€ˆ’…‹œ ŠŽ‘’“Š–ˆˆ Ž‚’Ž…ˆŸ ƒ€€’ˆ“…’, —’Ž ŠŽ‘’“Š–ˆŸ ‚›Ž€ … ˆ‚…„…’ Š Ž’Š€‡“. ค“ƒˆ… —ˆ’€’…‹ˆ Ž€“†€’, —’Ž ’Ž’ €‹ƒŽˆ’Œ ŒŽ†Ž ‡€ŠŽ„ˆŽ‚€’œ Ž‹…… Ž‘’Ž ‘‹…„“ž™ˆŒ Ž€‡ŽŒ: \prg x,y:=X, Y; \.{do} x>y \to x:=x-y \wbox y>x \to y:=y-x \.{od}; \var{…—€’€’œ}(x) \grp ฏŽŽ“…Œ ’……œ ‡€›’œ ˆƒ“ € ‹ˆ‘’… Š€’Ž€ ˆ Ž›’€…Œ‘Ÿ ˆ‡Ž…‘’ˆ ‡€Ž‚Ž €‹ƒŽˆ’Œ ฅ‚Š‹ˆ„€ „‹Ÿ Ž’›‘Š€ˆŸ €ˆŽ‹œ˜…ƒŽ Ž™…ƒŽ „…‹ˆ’…‹Ÿ „‚“• Ž‹Ž†ˆ’…‹œ›• —ˆ‘…‹ $X$ ˆ $Y$. ชŽƒ„€ Œ› ‘’€‹Šˆ‚€…Œ‘Ÿ ‘ ’€ŠŽƒŽ Ž„€ Ž‹…ŒŽ‰, ‚ ˆ–ˆ… ‚‘…ƒ„€ ‚Ž‡ŒŽ†› „‚€ Ž„•Ž„€. ฏ…‚›‰ ‘Ž‘’Žˆ’ ‚ ’ŽŒ, —’Ž› ›’€’œ‘Ÿ ‘‹…„Ž‚€’œ Ž…„…‹…ˆž ’…“…ŒŽƒŽ Ž’‚…’€ €‘’Ž‹œŠŽ ‹ˆ‡ŠŽ, €‘ŠŽ‹œŠŽ ’Ž ‚Ž‡ŒŽ†Ž. ฏŽ-‚ˆ„ˆŒŽŒ“, Œ› ŒŽƒ‹ˆ › ‘”ŽŒˆŽ‚€’œ ’€‹ˆ–“ „…‹ˆ’…‹…‰ —ˆ‘‹€ $X$; ’€ ’€‹ˆ–€ ‘Ž„…†€‹€ › ’Ž‹œŠŽ ŠŽ…—Ž… —ˆ‘‹Ž ‹…Œ…’Ž‚, ‘…„ˆ ŠŽ’Ž›• ˆŒ…‹ˆ‘œ › 1 ‚ Š€—…‘’‚… €ˆŒ…œ˜…ƒŽ ˆ $X$ ‚ Š€—…‘’‚… €ˆŽ‹œ˜…ƒŽ ‹…Œ…’€. (ฅ‘‹ˆ $X=1$, ’Ž €ˆŒ…œ˜ˆ‰ ˆ €ˆŽ‹œ˜ˆ‰ ‹…Œ…’› ‘Ž‚€„“’. ง€’…Œ Œ› ŒŽƒ‹ˆ › ‘”ŽŒˆŽ‚€’œ ’€Š†… €€‹Žƒˆ—“ž ’€‹ˆ–“ „…‹ˆ’…‹…‰ $Y$. จ‡ ’ˆ• „‚“• ’€‹ˆ– Œ› ŒŽƒ‹ˆ › ‘”ŽŒˆŽ‚€’œ ’€‹ˆ–“ —ˆ‘…‹, ˆ‘“’‘’‚“ž™ˆ• ‚ ˆ• Ž…ˆ•. ฎ€ …„‘’€‚‹Ÿ…’ ‘ŽŽ‰ ’€‹ˆ–“ \emph{Ž™ˆ•} „…‹ˆ’…‹…‰ —ˆ‘…‹ $X$ ˆ $Y$ ˆ ŽŸ‡€’…‹œŽ Ÿ‚‹Ÿ…’‘Ÿ …“‘’Ž‰, ’€Š Š€Š ‘Ž„…†ˆ’ ‹…Œ…’ 1. แ‹…„Ž‚€’…‹œŽ, ˆ‡ ’Ž‰ ’…’œ…‰ ’€‹ˆ–› Œ› ŒŽ†…Œ ‚›€’œ (Ž‘ŠŽ‹œŠ“ Ž€ ’Ž†… ŠŽ…—€Ÿ!) Œ€Š‘ˆŒ€‹œ›‰ ‹…Œ…’, ˆ Ž ›‹ › \emph{€ˆŽ‹œ˜ˆŒ} Ž™ˆŒ „…‹ˆ’…‹…Œ. จŽƒ„€ ‹ˆ‡ŠŽ… ‘‹…„Ž‚€ˆ… Ž…„…‹…ˆž, Ž„ŽŽ… Žˆ‘Ž‚€ŽŒ“ ‚›˜…, Ÿ‚‹Ÿ…’‘Ÿ ‹“—˜ˆŒ ˆ‡ ’ŽƒŽ, —’Ž Œ› ŒŽ†…Œ ‘„…‹€’œ. แ“™…‘’‚“…’, Ž„€ŠŽ, ˆ „“ƒŽ‰ Ž„•Ž„, ŠŽ’Ž›‰ ‘’Žˆ’ ˆ‘ŽŽ‚€’œ, …‘‹ˆ Œ› ‡€…Œ (ˆ‹ˆ ŒŽ†…Œ “‡€’œ) ‘‚Ž‰‘’‚€ ”“Š–ˆˆ, Ž„‹…†€™…‰ ‚›—ˆ‘‹…ˆž. ฌŽ†…’ ŽŠ€‡€’œ‘Ÿ, —’Ž Œ› ‡€…Œ ’€Š ŒŽƒŽ ‘‚Ž‰‘’‚, —’Ž Žˆ ‚ ‘Ž‚ŽŠ“Ž‘’ˆ Ž…„…‹Ÿž’ ’“ ”“Š–ˆž, ’Žƒ„€ Œ› ŒŽ†…Œ Ž›’€’œ‘Ÿ Ž‘’Žˆ’œ Ž’‚…’, ˆ‘Ž‹œ‡“Ÿ ’ˆ ‘‚Ž‰‘’‚€. ข ‘‹“—€e €ˆŽ‹œ˜…ƒŽ Ž™…ƒŽ „…‹ˆ’…‹Ÿ Œ› ‡€Œ…—€…Œ, €ˆŒ…, —’Ž, Ž‘ŠŽ‹œŠ“ „…‹ˆ’…‹ˆ —ˆ‘‹€ $-x$ ’… †… ‘€Œ›…, —’Ž ˆ „‹Ÿ ‘€ŒŽƒŽ —ˆ‘‹€ $x$, $\ญฎค(x, y)$ Ž…„…‹… ’€Š†… „‹Ÿ Ž’ˆ–€’…‹œ›• €ƒ“Œ…’Ž‚ ˆ … Œ…Ÿ…’‘Ÿ, …‘‹ˆ Œ› ˆ‡Œ…Ÿ…Œ ‡€Š €ƒ“Œ…’Ž‚. ฎ Ž…„…‹… ˆ ’Žƒ„€, ŠŽƒ„€ Ž„ˆ ˆ‡ €ƒ“Œ…’Ž‚ €‚… “‹ž; ’€ŠŽ‰ €ƒ“Œ…’ Ž‹€„€…’ …‘ŠŽ…—Ž‰ ’€‹ˆ–…‰ „…‹ˆ’…‹…‰ (ˆ Ž’ŽŒ“ €Œ … ‘‹…„“…’ ›’€’œ‘Ÿ ‘’Žˆ’œ ’“ ’€‹ˆ–“!), Ž Ž‘ŠŽ‹œŠ“ ‚’ŽŽ‰ €ƒ“Œ…’ $(\not=0)$ Ž‹€„€…’ ŠŽ…—Ž‰ ’€‹ˆ–…‰ „…‹ˆ’…‹…‰, ’€‹ˆ–€ Ž™ˆ• „…‹ˆ’…‹…‰ Ÿ‚‹Ÿ…’‘Ÿ ‚‘… †… …“‘’Ž‰ ˆ ŠŽ…—Ž‰. จ’€Š, Œ› ˆ•Ž„ˆŒ Š ‡€Š‹ž—…ˆž, —’Ž $\ญฎค(x,y)$ Ž…„…‹… „‹Ÿ ‚‘ŸŠŽ‰ €› $(x,y)$, ’€ŠŽ‰, —’Ž $(x, y)\not=(0, 0)$. ค€‹……, ‚ ‘ˆ‹“ ‘ˆŒŒ…’ˆˆ ŽŸ’ˆŸ "Ž™ˆ‰" €ˆŽ‹œ˜ˆ‰ Ž™ˆ‰ „…‹ˆ’…‹œ Ÿ‚‹Ÿ…’‘Ÿ ‘ˆŒŒ…’ˆ—Ž‰ ”“Š–ˆ…‰ ‘‚Žˆ• „‚“• €ƒ“Œ…’Ž‚. ฅ™… Ž„Ž …Ž‹œ˜Ž… “Œ‘’‚…Ž… “‘ˆ‹ˆ… Ž‡‚Ž‹ˆ’ €Œ “…„ˆ’œ‘Ÿ ‚ ’ŽŒ, —’Ž €ˆŽ‹œ˜ˆ‰ Ž™ˆ‰ „…‹ˆ’…‹œ „‚“• €ƒ“Œ…’Ž‚ … ˆ‡Œ…Ÿ…’‘Ÿ, …‘‹ˆ Œ› ‡€Œ…Ÿ…Œ Ž„ˆ ˆ‡ ’ˆ• €ƒ“Œ…’Ž‚ ˆ• ‘“ŒŒŽ‰ ˆ‹ˆ €‡Ž‘’œž. ฎฎ…„ˆˆ‚ ‚‘… ’ˆ …‡“‹œ’€’›, Œ› ŒŽ†…Œ ‡€ˆ‘€’œ: „‹Ÿ $(x,y)\not=(0,0)$ $$ \leqalignno{ \ญฎค(x, y) &= ญฎค(y, x). & (€) \cr \ญฎค(x, y)&= ญฎค(-x, y). & () \cr \ญฎค(x, y) &=ญฎค(x+y, y) = ญฎค(x-y, y)\hbox{ ˆ ’. „.} & (‚) \cr \ญฎค(x, y) &=abs(x),\hbox{ …‘‹ˆ $x=y$}. & (ƒ) \cr } $$ ฏ…„Ž‹Ž†ˆŒ „‹Ÿ Ž‘’Ž’› €‘‘“†„…ˆ‰, —’Ž ’ˆŒˆ —…’›œŒŸ ‘‚Ž‰‘’‚€Œˆ ˆ‘—…›‚€ž’‘Ÿ €˜ˆ Ž‡€ˆŸ Ž ”“Š–ˆˆ $\ญฎค$. คŽ‘’€’Ž—Ž ‹ˆ ˆ•? ข› ‚ˆ„ˆ’…, —’Ž …‚›… ’ˆ Ž’Ž˜…ˆŸ ‚›€†€ž’ €ˆŽ‹œ˜ˆ‰ Ž™ˆ‰ „…‹ˆ’…‹œ —ˆ‘…‹ $x$ ˆ $y$ —……‡ $\ญฎค$ „‹Ÿ „“ƒŽ‰ €›, € Ž‘‹…„…… ‘‚Ž‰‘’‚Ž ‚›€†€…’ …ƒŽ …Ž‘…„‘’‚…Ž —……‡ $x$. จ ‚ ’ŽŒ “†… Ž‘Œ€’ˆ‚€ž’‘Ÿ ŠŽ’“› €‹ƒŽˆ’Œ€, ŠŽ’Ž›‰ „‹Ÿ €—€‹€ Ž…‘…—ˆ‚€…’ ˆ‘’ˆŽ‘’œ $$ P= (\ญฎค(X,Y)=\ญฎค(x,y)) $$ (’Ž ‹…ƒŠŽ „Ž‘’ˆƒ€…’‘Ÿ “’…Œ ˆ‘‚€ˆ‚€ˆŸ "$x, y:= X, Y$"), Ž‘‹… —…ƒŽ Œ› "“’€ŒŽ‚›‚€…Œ" €“ ‡€—…ˆ‰ $(x,y)$ ’€ŠˆŒ Ž€‡ŽŒ, —’Ž› ‚ ‘ŽŽ’‚…’‘’‚ˆˆ ‘ (€), () ˆ‹ˆ (‚) Ž’Ž˜…ˆ… $P$ Ž‘’€‚€‹Ž‘œ ˆ‚€ˆ€’›Œ. ฅ‘‹ˆ Œ› ŒŽ†…Œ opƒaˆ‡Ž‚€’œ ’Ž’ Ž–…‘‘ “’€ŒŽ‚Šˆ ’€Š, —’Ž› „Ž‘’ˆƒ“’œ ‘Ž‘’ŽŸˆŸ, “„Ž‚‹…’‚ŽŸž™…ƒŽ $x=y$, ’Ž, ‘Žƒ‹€‘Ž (ƒ), Œ› €•Ž„ˆŒ ˆ‘ŠŽŒ›‰ Ž’‚…’, ‚‡Ÿ‚ €‘Ž‹ž’Ž… ‡€—…ˆ… $x$. ฏŽ‘ŠŽ‹œŠ“ €˜€ ŠŽ…—€Ÿ –…‹œ ‘Ž‘’Žˆ’ ‚ ’ŽŒ, —’Ž› Ž…‘…—ˆ’œ ˆ ˆ‚€ˆ€’Ž‘’ˆ $P$ ˆ‘’ˆŽ‘’œ $x=y$, Œ› ŒŽƒ‹ˆ › ˆ‘›’€’œ ‚ Š€—…‘’‚… ŒŽŽ’ŽŽ “›‚€ž™…‰ ”“Š–ˆˆ ”“Š–ˆž $$ t=\abs(x-y). $$ ็’Ž› “Ž‘’ˆ’œ €˜ €€‹ˆ‡ (‚‘…ƒ„€ Ž•‚€‹œ€Ÿ –…‹œ!), Œ› Ž’Œ…—€…Œ, —’Ž …‘‹ˆ €—€‹œ›… ‡€—…ˆŸ $x$ ˆ $y$ …Ž’ˆ–€’…‹œ›…, ’Ž ˆ—…ƒŽ …‹œ‡Ÿ ‚›ˆƒ€’œ ‚‚…„…ˆ…Œ Ž’ˆ–€’…‹œŽƒŽ ‡€—…ˆŸ: …‘‹ˆ ˆ‘‚€ˆ‚€ˆ… $x:=E$ Ž…‘…—ˆ‹Ž › $x<0$, ’Ž ˆ‘‚€ˆ‚€ˆ… $x:=-E$ ˆŠŽƒ„€ … ˆ‚…‹Ž › Š Ž‹“—…ˆž Ž‹œ˜…ƒŽ ŠŽ…—ŽƒŽ ‡€—…ˆŸ $t$ (Ž’ŽŒ“, —’Ž $y\ge 0$). ฏŽ’ŽŒ“ Œ› “‘ˆ‹ˆ‚€…Œ €˜… Ž’Ž˜…ˆ… $P$, ŠŽ’ŽŽ… „Ž‹†Ž ‘Ž•€Ÿ’œ‘Ÿ ˆ‚€ˆ€’›Œ: $$ P=(P1 \and P2) $$ ˆ $$ P1=(\ญฎค (X, Y)=\ญฎค (x, y)) $$ ˆ $$ P2=(x\ge 0 \and y\ge 0) $$ ํ’Ž Ž‡€—€…’, —’Ž Œ› Ž’Š€‡›‚€…Œ‘Ÿ Ž’ ‚‘ŸŠŽƒŽ ˆ‘Ž‹œ‡Ž‚€ˆŸ Ž…€–ˆ‰ $x:=-x$ ˆ $y:=-y$, ’.…. …Ž€‡Ž‚€ˆ‰, „Ž“‘’ˆŒ›• Ž ‘‚Ž‰‘’‚“ (). ญ€Œ Ž‘’€ž’‘Ÿ Ž…€–ˆˆ $$ \eqalign{ \hbox{ˆ‡ (a):}\; x,y&:=y,x\cr \hbox{ˆ‡ (‚):}\;\;\;\; x&:=x+y \; y:=y+x\cr x&:=x-y \; y:=y-x\cr x&:=y-x \; y:=x-y\cr } $$ ก“„…Œ ‡€ˆŒ€’œ‘Ÿ ˆŒˆ Ž Ž—……„ˆ ˆ €—…Œ ‘ €‘‘ŒŽ’…ˆŸ $x, y :=y, x$: $$ \wp("x, y: = y, x", \abs(x-y) \le t_0) = (\abs(y-x)\le t_0) $$ Ž’ŽŒ“ $$ t_{min} (x, y) = \abs (y-x) $$ ‘‹…„Ž‚€’…‹œŽ $$ \wdec ("x, y:= y, x", \abs (x-y) ) = (\abs (y-x) \le \abs(x-y)-1)=F $$ จ ‡„…‘œ --- „‹Ÿ ’…•, Š’Ž … Ž‚…ˆ‹ › …‡ ”ŽŒ€‹œŽƒŽ ‚›‚Ž„€,---Œ› „ŽŠ€‡€‹ˆ (ˆ‹ˆ, …‘‹ˆ “ƒŽ„Ž, Ž€“†ˆ‹ˆ) ‘ ŽŒŽ™œž €˜ero ˆ‘—ˆ‘‹…ˆŸ, —’Ž …Ž€‡“ž™€Ÿ Ž…€–ˆŸ $x,y:=y,x$ … …„‘’€‚‹Ÿ…’ ˆ’……‘€, ’€Š Š€Š Ž€ … ŒŽ†…’ ˆ‚…‘’ˆ Š †…‹€…ŒŽŒ“ ””…Š’ˆ‚ŽŒ“ “Œ…œ˜…ˆž ‚›€Ž‰ €Œˆ ”“Š–ˆˆ $t$. แ‹…„“ž™…‰ ˆ‘›’›‚€…’‘Ÿ Ž…€–ˆŸ $x:=x+y$, ˆ Œ› €•Ž„ˆŒ, ‘Ž‚€ ˆŒ…ŸŸ ˆ‘—ˆ‘‹…ˆ… ˆ‡ …„›„“™ˆ• ƒ‹€‚: $$ \displaylines{ \wp("x:=x+y", \abs(x-y)\le t_0)=(\abs(x)\le t_0)\cr t_{min} (x, y)=\abs(x)=x\cr } $$ (Œ› Žƒ€ˆ—ˆ‚€…Œ‘Ÿ ‘Ž‘’ŽŸˆŸŒˆ, “„Ž‚‹…’‚ŽŸž™ˆŒˆ $P$) $$ \eqalign{ \wdec("x:=x+y", \abs(x-y)) &= (t_{min}(x, y) \le t(x, y)-1)\cr &= (x\le \abs(x-y)-1)\cr &= (x+1\le \abs(x-y))\cr &= (x+1\le x-y \or x+1 \le y-x)\cr } $$ ฏŽ‘ŠŽ‹œŠ“ ˆ‡ $P$ ‘‹…„“…’ Ž’ˆ–€ˆ… …‚ŽƒŽ —‹…€ ˆ Š ’ŽŒ“ †… $P \Rightarrow \wp("x:=x+y", P)$, ’Ž “€‚…ˆ… €˜…ƒŽ …„Ž•€ˆ’…‹Ÿ $$ (P \and B_j) \Rightarrow (\wp (SL_j, P) \and \wdec (SL_j, t )) $$ “„Ž‚‹…’‚ŽŸ…’‘Ÿ Ž‘‹…„ˆŒ —‹…ŽŒ, ˆ Œ› €˜‹ˆ €˜“ …‚“ž, € ’€Š†… (ˆ‡ ‘ŽŽ€†…ˆ‰ ‘ˆŒŒ…’ˆˆ) €˜“ ‚’Ž“ž Ž•€Ÿ…Œ“ž ŠŽŒ€„“: $$ x+1\le y-x \to x:=x+y $$ ˆ $$ y+1\le x-y \to y :=y+x $$  €‹Žƒˆ—Ž Œ› €•Ž„ˆŒ (”ŽŒ€‹œ›… Œ€ˆ“‹Ÿ–ˆˆ …„Ž‘’€‚‹Ÿž’‘Ÿ ‚ Š€—…‘’‚… “€†…ˆŸ ˆ‹…†ŽŒ“ —ˆ’€’…‹ž) $$ 1\le y \and 3 * y \le 2* x-1\to x:=x-y $$ ˆ $$ 1\le x \and 3 * x \le2 * y-1\to y:=y-x $$ ˆ $$ x+1\le y-x \to x:=y-x $$ ˆ $$ y+1\le x-y \to y:=x-y $$ เ€‡Ž€‚˜ˆ‘œ ‚ ’ŽŒ, —…ƒŽ Œ› „Ž‘’ˆƒ‹ˆ, Œ› ‚›“†„…› ˆ‰’ˆ Š „Ž‘€„ŽŒ“ ‡€Š‹ž—…ˆž, —’Ž ‘Ž‘ŽŽŒ, €Œ…—…›Œ ‚ ŠŽ–… …„›„“™…‰ ƒ‹€‚›, €Œ … “„€‹Ž‘œ …˜ˆ’œ ‘‚Žž ‡€„€—“: ˆ‡ $P \and \non BB$ … ‘‹…„“…’, —’Ž $x=y$. (ญ€ˆŒ…, ˆ $(x, y) = (5,7)$ ‡€—…ˆŸ ‚‘…• …„Ž•€ˆ’…‹…‰ ŽŠ€‡›‚€ž’‘Ÿ ‹Ž†›Œˆ.) ฌŽ€‹œ ‘Š€‡€ŽƒŽ, €‡“Œ……’‘Ÿ, ‚ ’ŽŒ, —’Ž €˜ˆ ˜…‘’œ ˜€ƒŽ‚ … ‚‘…ƒ„€ Ž…‘…—ˆ‚€ž’ ’€ŠŽ‰ “’œ ˆ‡ €—€‹œŽƒŽ ‘Ž‘’ŽŸˆŸ ‚ ŠŽ…—Ž… ‘Ž‘’ŽŸˆ…, ˆ ŠŽ’ŽŽŒ $\abs(x-y)$ ŒŽŽ’ŽŽ “Œ…œ˜€…’‘Ÿ. ฏŽ’ŽŒ“ €Œ “†Ž ˆ‘›’€’œ „“ƒˆ… ‚Ž‡ŒŽ†Ž‘’ˆ. ค‹Ÿ €—€‹€ ‡€Œ…’ˆŒ, —’Ž … Ž‚…„ˆ’ …‘ŠŽ‹œŠŽ “‘ˆ‹ˆ’œ “‘‹Ž‚ˆ… $P2$: $$ P2=(x>0 \and y>0) $$ ’€Š Š€Š €—€‹œ›… ‡€—…ˆŸ $x$ ˆ $y$ “„Ž‚‹…’‚ŽŸž’ ’€ŠŽŒ“ “‘‹Ž‚ˆž, ˆ, ŠŽŒ… ’ŽƒŽ, …’ ˆŠ€ŠŽƒŽ ‘Œ›‘‹€ ‚ ƒ……€–ˆˆ €‚ŽƒŽ “‹ž ‡€—…ˆŸ, Ž‘ŠŽ‹œŠ“ ’Ž ‡€—…ˆ… ŒŽ†…’ ‚Ž‡ˆŠ“’œ ’Ž‹œŠŽ ˆ ‚›—ˆ’€ˆˆ ‚ ‘Ž‘’ŽŸˆˆ, ƒ„… $x=y$, ’.…. ŠŽƒ„€ “†… „Ž‘’ˆƒ“’Ž ŠŽ…—Ž… ‘Ž‘’ŽŸˆ…. ญŽ ’Ž ’Ž‹œŠŽ Œ€‹€Ÿ ŒŽ„ˆ”ˆŠ€–ˆŸ; Ž‘Ž‚€Ÿ ŒŽ„ˆ”ˆŠ€–ˆŸ „Ž‹†€ ›’œ ‘‚Ÿ‡€€ ‘ ‚‚…„…ˆ…Œ Ž‚Ž‰ ”“Š–ˆˆ $t$, ˆ Ÿ …„‹€ƒ€ž ‚‡Ÿ’œ ’€Š“ž ”“Š–ˆž $t$, ŠŽ’Ž€Ÿ ’Ž‹œŠŽ Žƒ€ˆ—…€ ‘ˆ‡“ ‚ ‘ˆ‹“ ˆ‚€ˆ€’Ž‘’ˆ $P$. ฎ—…‚ˆ„›Œ ˆŒ…ŽŒ Ÿ‚‹Ÿ…’‘Ÿ $$ t=x+y $$ ฌ› ‚›Ÿ‘Ÿ…Œ, —’Ž „‹Ÿ Ž„Ž‚…Œ…ŽƒŽ ˆ‘‚€ˆ‚€ˆ‚€ˆŸ $$ \wdec ("x, y:=y, x", x+y) =F $$ ˆ Ž’ŽŒ“ Ž„Ž‚…Œ…Ž… ˆ‘‚€ˆ‚€ˆ… Ž’‚…ƒ€…’‘Ÿ. ฌ› €•Ž„ˆŒ „‹Ÿ ˆ‘‚€ˆ‚€ˆŸ $x:= x+y$ $$ \wdec("x:=x+y", x+y) = (y< 0) $$ จ‘’ˆŽ‘’œ ’ŽƒŽ ‚›€†…ˆŸ ˆ‘Š‹ž—€…’‘Ÿ ˆ‘’ˆŽ‘’œž ˆ‚€ˆ€’ŽƒŽ Ž’Ž˜…ˆŸ $P$, € ‘‹…„Ž‚€’…‹œŽ, ’€ŠŽ… ˆ‘‚€ˆ‚€ˆ… (€Ÿ„“ ‘ ˆ‘‚€ˆ‚€ˆ…Œ $y:=y+x$) ’€Š†… Ž’‚…ƒ€…’‘Ÿ. ฎ„€ŠŽ „‹Ÿ ‘‹…„“ž™…ƒŽ ˆ‘‚€ˆ‚€ˆŸ $x:=x-y$ Œ› €•Ž„ˆŒ $$ \wdec("x:=x-y", x+y) = (y>0) $$ ’. …. “‘‹Ž‚ˆ…, ŠŽ’ŽŽ…, ‹Žƒˆ—…‘Šˆ ‘‹…„“…’ ˆ‡ “‘‹Ž‚ˆŸ $P$ ( “‘ˆ‹…ŽƒŽ ŒŽž €„ˆ ’ŽƒŽ). ฎŠ›‹…›… €„…†„Ž‰, Œ› ˆ‡“—€…Œ $$ \wp("x:=x-y", P) = (\ญฎค(X, Y)=\ญฎค(x-y, y) \and x-y > 0 \and y>0) $$ ช€‰ˆ… —‹…› ŒŽ†Ž Ž’Ž‘ˆ’œ, Ž’ŽŒ“ —’Ž Žˆ ‘‹…„“ž’ ˆ‡ $P$, ˆ “ €‘ Ž‘’€…’‘Ÿ ‘…„ˆ‰ —‹…: ˆ’€Š, Œ› €•Ž„ˆŒ \prg x>y\to x:=x-y \grp ˆ \prg y>•\to y:=y-x \grp จ € ’ŽŒ Œ› ŒŽƒ‹ˆ › …Š€’ˆ’œ ˆ‘‘‹…„Ž‚€ˆ…, ’€Š Š€Š, ŠŽƒ„€ ‡€—…ˆŸ ŽŽˆ• …„Ž•€ˆ’…‹…‰ ‘’€Ž‚Ÿ’‘Ÿ ‹Ž†›Œˆ, ‚›Ž‹Ÿ…’‘Ÿ †…‹€…ŒŽ… €Œˆ Ž’Ž˜…ˆ… $x=y$. ฅ‘‹ˆ Œ› Ž„Ž‹†ˆŒ, ’Ž €‰„…Œ ’…’ˆ‰ ˆ —…’‚…’›‰ ‚€ˆ€’›: \prg x>y-x \and y>x\to x:=y-x \grp ˆ \prg y>x-y \and x>y\to y:= x-y \grp Ž … Ÿ‘Ž, —’Ž ŒŽ†Ž ‚›ˆƒ€’œ ˆ• ‚Š‹ž—…ˆ…Œ. {\bf ใ€†…ˆŸ.} 1. จ‘‘‹…„“‰’… ˆ ’ŽŒ †… $P$ ‚›Ž $t=\max(x, y)$. 2. จ‘‘‹…„“‰’… ˆ ’ŽŒ †… $P$ ‚›Ž $t=x+2*y$. 3. คŽŠ€†ˆ’…, —’Ž ˆ $X>0$ ˆ $Y>0$ ‘‹…„“ž™€Ÿ Žƒ€ŒŒ€, Ž…ˆ“ž™€Ÿ €„ —…’›œŒŸ ……Œ…›Œˆ, \prg x, y, u, v:=X, Y, Y, X; \.{do} x>y\to x, v:=x-y, v+u \wbox y>x \to y, u:= y-x, u+v \.{od}; \var{…—€’€’œ}((x+y)/2); \var{…—€’€’œ}((u+v)/2) \grp …—€’€…’ €ˆŽ‹œ˜ˆ‰ Ž™ˆ‰ „…‹ˆ’…‹œ —ˆ‘…‹ ๅ ˆ ใ, € ‘‹…„ŽŒ ‡€ ˆŒ ˆ• €ˆŒ…œ˜…… Ž™…… Š€’Ž…. (ชŽ…– “€†…ˆ‰.) ญ€ŠŽ…–, …‘‹ˆ €˜ Œ€‹…œŠˆ‰ €‹ƒŽˆ’Œ ‡€“‘Š€…’‘Ÿ ˆ €… $(X,Y)$, ŠŽ’Ž€Ÿ … “„Ž‚‹…’‚ŽŸ…’ …„Ž‹Ž†…ˆž $X>0 \and Y>0$, ’Ž Žˆ‡Ž‰„“’ …ˆŸ’Ž‘’ˆ: …‘‹ˆ $(X,Y)=(0, 0)$, ’Ž Ž‹“—ˆ’‘Ÿ …€‚ˆ‹œ›‰ “‹…‚Ž‰ …‡“‹œ’€’, € …‘‹ˆ Ž„ˆ ˆ‡ €ƒ“Œ…’Ž‚ Ž’ˆ–€’…‹œ›‰, ’Ž ‡€“‘Š ˆ‚…„…’ Š …‘ŠŽ…—Ž‰ €Ž’…. ํ’ŽƒŽ ŒŽ†Ž ˆ‡…†€’œ, €ˆ‘€‚ \prg \.{if} X>0 \and Y>0 \to x,y:=X,Y; \.{do} x>y\to x:=x-y\wbox y>x\to y:=y-x \.{od}; \var{…—€’€’œ}(x) \.{fi} \grp ขŠ‹ž—ˆ‚ ’Ž‹œŠŽ Ž„ˆ ‚€ˆ€’ ‚ ŠŽ‘’“Š–ˆž ‚›Ž€, Œ› Ÿ‚Ž ‚›€‡ˆ‹ˆ “‘‹Ž‚ˆŸ, ˆ ŠŽ’Ž›• Ž†ˆ„€…’‘Ÿ €Ž’€ ’Ž‰ Œ€‹…œŠŽ‰ Žƒ€ŒŒ›. ข ’€ŠŽŒ ‚ˆ„… ’Ž •ŽŽ˜Ž ‡€™ˆ™…›‰ ˆ „Ž‚Ž‹œŽ ‘€ŒŽ‘’ŽŸ’…‹œ›‰ ”€ƒŒ…’, Ž‹€„€ž™ˆ‰ ’…Œ ˆŸ’›Œ ‘‚Ž‰‘’‚ŽŒ, —’Ž Ž›’Š€ ‡€“‘Š€ ‚… …ƒŽ Ž‹€‘’ˆ Ž…„…‹…ˆŸ ˆ‚…„…’ Š …Œ…„‹…ŽŒ“ Ž’Š€‡“. \bye