Лекция 4.++Итерационные циклы и рекуррентные вычисления (Воробьева И.А. - Информатика. Язык Паскаль), страница 2

. .. , а не с индекса «1»: 1 ; 2 ; . . . … .Отличительный признак таких рядов – это «1» в качестве первогочлена ряда; требуют поиска двух рекуррентных соотношений (когда членряда является суммой 2-х слагаемых); имеют область определения | | < 1, ≠ 0 (когда в контрольнойфункции есть деление на ноль).Варианты 1, 7, 9, 27 - могут содержать опечатки (зависит от источника), 28, 33– могут потребовать помощи или комментария (обратиться ко мне).Проведение тестов и форматированный вывод результатовДля обеспечения качественной проверки суммирования ряда,исследования его сходимости и предоставления удобного результата,потребуется выполнить следующие действия: вычислить на калькуляторе контрольную формулу при X=0.5; обеспечить табличное представление результата дляфиксированной точности и массива значений Х = -0.98, 0.5, 0.1, 0.5.

0.95;1112Воробьева И.А. «Информатика. Язык Паскаль» провести серию тестов для значений точности = 10-2, 10-4,10-6, 10-8; подсчитать число итераций, потребовавшихся для достижениязаданной точности; отобразить в отчете все результаты.Результаты вычислений вывести на экран в виде таблице соследующими столбцами:|() − ()|,№XS(x),K,F(x),Номерсуммачислоконтрольнаяконтрольэлементаряда потребовавшформулаточностимассива Xихсяитераций-0.98…0.95Результат проведения эксперимента для одного фиксированногозначения точности приведен на рисунке ниже.1213Воробьева И.А. «Информатика. Язык Паскаль»Покажем, как обеспечить форматированный вывод в виде таблицыв Паскале1. Пусть в программе определены величины:CONSTnmax= 5; // максимальное число точек в массиве XVARx: array[1..nmax] of real; // массив аргументов сложной функцииn: byte;// реальное число аргументов в массиве X[]j: integer;// индекс прохода по массиву X[]eps: real:// заданная точность суммирования рядаsum: real; // значение суммы ряда, вычисленное с точностью Epscnt: byte; // число итераций, которое было выполнено дляполучения Sumz: byte;// (число знаков после запятой в Eps) +1Тогда фрагмент кода табличного вывода данных будет выглядетьследующим образом:// вычисляем (число знаков после запятой в Eps) +1z: = Round( Abs( Ln(eps)/ln(10) ) ) +1;Writeln(‘Eps = ‘, eps: z+2: z);// вывод Eps в формате Eps:(z+2):z// вывод заголовка таблицыWriteln(‘N |X| S(X) | K |F(X)| |S(X)-F(X)|’);For j:=1 to 80 DoWrite("=");Writeln;// вывод полученных в программе данных в таблицу.

Очевидно, чтоэта строка должна попасть внутрь параметрического цикла по «j»– массиву X, а до нее должен отработать итерационный циклвычисления Sum, показанный на с.81При сдаче лабораторной работы вы должны быть готовы объяснить каждую строку данного кода, так как оноснован на материале, пройденном ранее (табл. .2.2, 2.3 лекция 1).1314Воробьева И.А.

«Информатика. Язык Паскаль»Writeln(j:2, ’|’, X[j]:17:z, ‘|’, sum:17:z, ‘|’, Cnt:3, ‘|’, func:17:z, ‘|’, Abs(sumfunc):17:z);14.