Оператор цикла с постусловием
Данный оператор используется, когда неизвестно число повторений, условие, управляющее циклом формируется на окончание цикла, данный вид цикла выполняется хотя бы один раз.
Описывается следующим образом:
Repeat
<тело цикла>;
<изменение параметров цикла>
until <логическое выражение>;
Выполняется следующим образом:
Выполняется тело цикла.
Обязательно есть величина, которая, изменяясь, влияет на логическое выражение.
Если результат после until равен false, то действия выполняются снова. Если результат равен true, выполняются действия далее по программе.
Пример программы:
Program ma;
Const
EPS=1E-10;
var
n: byte;
t, x, F, s: real;
begin
writeln (‘Ввод x’);
readln (x);
n:=1;
t:=x;
s:=0;
repeat
s:=s+t;
n:=n+t;
F:=SQR (x)/((2*n-2)*(2*n-1));
Until
ABS (t)<=EPS;
Writeln (t, s);
End.
Оператор цикла с параметром
Используются, когда известно число повторений. Число повторений подсчитывается с помощью специальной переменной – счетчика, для которой известно начальное и конечное значение и шаг изменения. Управление циклом осуществляется на основании сравнения конечного значения счетчика с текущим. Переменную счетчика цикла называют параметром, а сам цикл – циклом с параметром.
В Pascal шаг изменения счетчика цикла может быть равен +1 или -1 и изменяется автоматически.
Описывается следующим образом:
For <счетчик цикла>:=<начальное значение> to <конечное значение> do
Begin
<Оператор 1>;
.............
End.
For <счетчик цикла>:=< конечное значение> downto < начальное значение> do
Begin
<Оператор 1>;
.............
End.
При использовании цикла с параметрами надо придерживаться правил:
Параметры начального и конечного значений должны быть одного типа.
Тип может быть любым, кроме вещественного.
Очередное значение параметра цикла вычисляется с помощью функции succ в сочетании с downto.
Запрещено изменять в теле цикла параметр цикла начального и конечного значения.
Запрещено входить в цикл с помощью оператора goto, минуя заголовок for.
Начальное значение должно быть меньше конечного в сочетании с to и больше конечного с downto.
По окончанию выполнения цикла значение счетчика цикла неопределенно и нельзя его использовать в дальнейших вычислениях
Из составного оператора входящего в оператор цикла можно выйти в любой момент с помощью goto значение сохраняется.
Program summa;
Var
K:byte;
A,s:real;
Begin
S:=0;
For k:=1 to 25 do
Begin
A:=(2*k)/(SQR(k)+1);
S:=s+a;
End;
Write (‘summa’,s);
Readln;
End.
Итерационный цикл
Большое место среди циклов с неизвестным числом повторений занимают циклы, которые в процессе повторения тела цикла получают последовательность значений, которая сводиться к некоторому пределу А. При этом каждое новое значение уn получается из предыдущего значения и является более точным приближением к значению предела А, такие циклы называются итерационными. В итерационных циклах условие продолжения цикла основано на свойстве безграничного приближения значения уn к значению предела А, при n→∞.
Итерационный цикл
заканчивается, если для некоторого n
выполняется следующее условие:
,
где ε – это погрешность результата.
Примером итерационного цикла процесс
является задача вычисления суммы
бесконечного ряда.
Массив
Массив – это конечная последовательность однотипных элементов. Массивы которые хранят линейную таблицу называются одномерными. Основные типы задач при работе с массивами:
Ввод и вывод элементов массива.
Нахождение суммы или количества элементов, удовлетворяющих некоторому условию.
Нахождение максимального или минимального элемента массива.
Сортировка массива.
Массивы, которые хранят прямоугольную таблицу (матрицу) называются двумерными.
В массиве все элементы пронумерованы, номер элемента в массиве называется индексом. Наибольшее значение индекса определяет размерность массива. Все элементы массива имеют одно общее имя. Обращаются к элементам массива по имени и по индексу, заключенному в квадратные скобки. Имя переменной называется индексной переменной. Тип индекса может быть любой, кроме вещественного.
Описываются массивы следующим образом:
Type
<имя типа массива>=array [<тип индекса>] of <тип элементов>;
var
<имя массива>: <имя типа-массив>;
type
mas=array [1..15] of integer;
var
A:mas;
var
<имя массива>: array [<тип индекса>] of <тип элементов>;
Над элементами массива допустимы все те действия, которые допустимы до базового типа элементов.