„ ญฎ  คข   ค๗ฉแญ๗ คฎค โญ๗ ็จแซ . ‡ญ ฉโจ แฅเฅคญ๕  เจไฌฅโจ็ญฅ ๗ แฅเฅคญ๕
  เจไฌฅโจ็ญฅ ๆจๅ ็จแฅซ.
  ซฃ ‘€ ๗ ‘ƒ (ค๗ฉแญ ๅ, ใ,  , g)
  เฃ ๅ, ใ
 เฅง  , ค
 ฏฎ็  := (x+y)/2
 g:=   x*y
 10 REM CA I Cƒ
 20 INPUT "‚‚…‘’ˆ „‚€ „Ž„€’๖ —ˆ‘‹€"; X, Y
 30 A= (X+Y)/2
 40 G= SQR (X*Y)
 50 PRINT "‘……„๔ €ˆ”Œ…’ˆ—… —ˆ‘…‹":X;โ  Y "„Ž๖‚ž๔"; A
 60 PRINT "‘……„๔ ƒ…ŽŒ…’ˆ—… —ˆ‘…‹":X;โ  Y "„Ž๖‚ž๔"; G
 70 END
                        Ž—€’ŽŠ
                         X, Y
                         :=(x+y)/2
                        g:=    x*y
                         a, g
                        Š๖…–œ