Примечание. После вычисления статистических характеристик массива партии чисел Xi можно вернуться к вводу новой партии, набрав ее первое число и нажав клавишу В.

Программа П24. Генерация случайных чисел с повышенной скоростью (в 3-4 раза выше, чем по программе ML-lS).

1. Для чисел с равномерным распределением в интервале [О, 1], Ввод; Vo = /?Х < 1.

X 1 1 Ч- я = INV Int R/S RST

Для Vo = 0,123456789, нажимая клавишу R/S, будем получать V, = 0,4996173326, Vz = 0,6373833121, Vj = 0,1528090865, V* - = 0,8224926048, Vs = 0,189011306 и т. д. (время генерации одного числа менее 1 с).

2. Для чисел с равномерным распределением в интервале [а, Ь]. Ввод: Vo == Л01 < 1, а = /?02 и 6 =» R03.

RCL 01 X 3 7 = INV Int STO 01 X ( RCL 03 - RCL 02 ) + RCL 02 = R/S RST

Для Vo=0,123456789, a = 1 и 6 2 получим Xi»= 1,567901193, Xs = 1,012344141, X> = 1,466733217, Xi - 1,899129029 и т. д. (время выдачи одного числа 1,5 с).

3. Для чисел с нормальным распределением. Ввод: Vo =i = JROl < 1, о = R02 и R = R03. Перед пуском нажать клавиши 2nd и Rad.

RCL 01 X 3 7 = INV Int x:t RCL

01 X 2 X я = sin X ( x:t STO 01 1/x Inx X 2 ) л/х X RCL

02 + RCL 03 - R/S RST

Для Vo = 0,1234567, о = 0,1 и R = 1 получим, нажимая клавишу R/S, R, = 1,074487657, Rz = 0,8771869012, R, = 1,00966529, 4 = 1,023339944, Rs = 0,7849199467 и т. д. (время выдачи одною числа 2 с).

Программа П25*). Вычисление коэффициентов bo и bi приближения гиперболической функцией у = b bi/x. Ввод (после нажатия клавиш RST и R/S): Xi, yi, Хг, уг, Хк, уц в регистр X (после ввода каждой пары Xi, yi высвечивается номер i). Вывод результатов: после нажатия клавиши А получим коэффициент bo, после нажатия клавиши х =i=t коэффициент bi. Для вычисления у(х) набираем х = ЛХ, нажимаем клавишу В и т. д.

*) В программах П25 -;- П29 приближение нелинейной функцией осуществляется с помощью линеаризирующих преобразований [17] и линейной регрессии, выполняемой оператором Ор 12 и программой ML-lj

Pffin 01 SBR CLR Lbl R/S R/S l/x x:t CLR R/S GTO R/S Lbl A Op 12 R/S Lbl

В l/x Op 14 R/S Программа П26. Вычисление коэффицнеитов bt, и &i приближения степенной функцией у - Ьх. Ввод и вывод результатов см. в программе П25. Pgm 01 SBR CLR Lbl R/S R/S log x:;t CLR R/S log S l A Op 12 INV

log xtt x:t R/S Lbl В log Op 14 INV log R/S

Программа П27. Вычпсление коэффициентов &„ и bi приближения показательной функцией у = bbf. Ввод и вывод результатов см. в программе П25.

Pgm 01 SBR CLR Lbl R/S R/S x:t CLR R/S

log -t- GTO R/S Lb! A Op 12 INV log

x:i INV log д::/ R/S Lbl В Op 14 INV log R/S

Программа П28. Вычисление коэффициентов bo и 6, приближения экспоненциальной функцией у = baexp(b,x). Ввод и вывод результатов см. в программе П25.

Pgm 01 SBR CLR Lbl R/S R/S x:f CLR R/S Inx 2+ QTO R/S Lbl A Op 12 INV In лг Kt x:t R/S Lbl В Op 14 INV In л: R/S

Программа П29. Вычисление коэффициентов &„ и ft, приближения логарифмической функцией y = bo + btlogx. Ввод и вывод результатов см. в программе П25.

Pgm 01 SBR CLR Lbl R/S R/S log x:t CLR R/S Y+ GTO R/S Lbl A Op 12 R/S Lbl В log Op 14 R/S

Программа П30. Вычисление коэффициентов a и 6 приближения показательной функцией у = 10<+*. Ввод (после нажатия клавиши RSr): Xi, yi, хг, Уг, Хк, уы в регистр X. Для получения а нажать клавишу А, для получения Ь -нажать клавишу R/S, CMs Lbl Е STO 09 SUM 08 X R/S STO

02 log SUM 06 = SUM 03 RCL 09 x SUM 05 Op 20 RCL 02 R/S GTO E Lbl A RCL 00 X RCL 05 - RCL 08 x

= STO 07 RCL 06 X RCL 05 - RCL

03 X RCL 08 = STO 10 RCL 03 X

RCL 00 - RCL 06 X RCL 08 = STO 11 RCL 10 - RCL 07 = R/S RCL 11 -T- RCL 07 = R/S Программа П31. Вычисление коэффициентов bo, bi и 6г приближения параболической функцией у = bo + btx + Ьгх. Ввод; RST 2nd CMs и далее Xi, yi, Х}, уг, .... Xn, уп в регистр X. Вывод результатов: нажав клавиши 2nd Е, получим bo, нажав клавишу R/S дважды, получим сначала bi, затем &2.

Программа П32. Вычисление коэффициентов «о, ai, a,v интерполирующего многочлена Ньютона и коэффициентов полинома у{х) = ао + OiX + Ozx+ ... + а„х" при равномерном расположении узлов yiiXi) с шагом к Ввод (после нажатия клавиши RST): Уо = R0, yi = Rl, ..., Уп = Rn (n < 15) и n = RX. Нажав клавишу R/S, получаем ORX, ао-* RO, a.t-*Rl, 0Ln-*Rn. Вводим h = RX И, нажимая n + I раз клавишу R/S, получаем

Co, Oi.....a„ (они заносятся в регистры RQ~-Rn). Для вычисления

y{Z), где Z = x - Хо, нажимаем клавишу А (получаем Q-RX), вводим Z и, нажав клавишу R/S, получаем y{Z)-RX,