10 PRINT TAB(6);"Œ…’Ž„ ƒ€“‘‘€-‡…‰„…‹Ÿ ‘ ……Œ…›Œ ˜€ƒŽŒ"
20 PRINT TAB(8);"Žˆ‘Š€ ŒˆˆŒ“Œ€ ”“Š–ˆˆ N ……Œ…›•":PRINT
30 PRINT"Ž„Žƒ€ŒŒ€ ‚›—ˆ‘‹…ˆŸ ”“Š–ˆˆ –…‹ˆ ‚‚…„…€ („€-…’)";
40 INPUT A$:PRINT:IF A$="„€" THEN 90
50 PRINT"‚‚…„ˆ’… Ž„Žƒ€ŒŒ“ 500, ‚•Ž„€Œˆ ŠŽ’ސމ Ÿ‚‹Ÿž’‘Ÿ"
60 PRINT"X(1),X(2),...,X(N)-‚€œˆ“…Œ›… €€Œ…’›, ‚›•Ž„ŽŒ-"
70 PRINT TAB(5);"F-‡€—…ˆ… ”“Š–ˆˆ –…‹ˆ F(X(1),X(2),...,X(N)).":PRINT
80 PRINT" ‚‚…„Ÿ Ž„Žƒ€ŒŒ“, ‡€“‘’ˆ’… Žƒ€ŒŒ“ ‘€—€‹€.":GOTO 300
90 DIM X(10),H(10),K(10)
100 PRINT"‚‚…„ˆ’… N-ŠŽ‹ˆ—…‘’‚Ž ……Œ…›•";:INPUT N
110 PRINT" ‚‚…„ˆ’… X,H,K-€—€‹œ“ž ŠŽŽ„ˆ€’“, ˜€ƒ ˆ А€’Ž‘’œ"
120 PRINT"“Œ…œ˜…ˆŸ ˜€ƒ€ „‹Ÿ Š€†„މ ˆ‡ ……Œ›•:"
130 FOR Z=1 TO N: PRINT" ","„‹Ÿ X";Z;: INPUT X(Z),H(Z),K(Z): NEXT Z
140 PRINT"E-’Ž…“…Œ€Ÿ ’Ž—Ž‘’œ ‹ŽŠ€‹ˆ‡€–ˆˆ ŒˆˆŒ“Œ€"
150 PRINT TAB(10);"Ž …‚މ ……Œ…Ž‰";:INPUT E
160 GOSUB 500
170 F2=F
180 FOR Z=1 TO N:N0=0
190 F1=F:X(Z)=X(Z)+H(Z): GOSUB 500
200 IF F 210 N0=N0+1: H(Z)=-H(Z): IF N0=1 THEN 190
220 X(Z)=X(Z)+H(Z):NEXT Z
230 IF F1 240 IF ABS(H(1))<=E THEN 270
250 FOR Z=1 TO N: H(Z)=H(Z)/K(Z):NEXT Z
260 F2=F1:GOTO 180
270 PRINT:PRINT" ”“Š–ˆŸ F ŒˆˆŒ€‹œ€ ‚ ’Ž—Š… ‘ ŠŽŽ„ˆ€’€Œˆ"
280 FOR Z=1 TO N:PRINT TAB(17);"X";Z;"=";X(Z):NEXT Z
290 PRINT TAB(10);"‚ ’މ ’Ž—Š… Ž€ €‚€";F1
300 END
500 X=X(1)-1:Y=X(2)-3:F=10*X*X+2*Y*Y+5
510 RETURN
520 END
’““ "Šö" ö­¦„­„ą­®-å÷¬÷ē­Ø© ä Ŗć«ģā„ā. Š ä„¤ą   ¢ā®¬ āا ę÷ł.