Пишется так:
while условие do
begin
Тело цикла
end;
Выполняет тело цикла (команды между begin и end;) пока соблюдено условие в заголовке цикла.
Пример:
while x<100 do
begin
x:= x+1;
end;
Прибавляет к переменной x единицу пока x меньше ста. Если x больше ста, то цикл заканчивается.
Числа ФибоначчиПоследовательность начинается с 0 1
Каждое следующее число равно сумме двух предыдущих
0 1 1 (0+1=1)
0 1 1 2 (1+1=2)
0 1 1 2 3 (1+2=3)
0 1 1 2 3 5 (2+3=5)
и т.д.
Одномерные массивыМассив можно представить как ряд из ящиков
каждый ящик имеет свой номер (индекс)
в ящике лежит значение (цифры или символы)
Объявляются как переменные в начале программы:
program raf105
var название:array[количество элементов] of тип;
количество элементов пишется как диапазон от минимального значения индекса (Индекс это число в квадратных скобках) до максимального между ними ставятся две точки
Пример:
program raf105
var X:array[1..10] of integer;
Это массив под названием X с 10-ю элементами типа integer
Обращение к массиву
Название[индекс]
Пример:
x[8]:= 101;
Мы присвоили восьмому элементу массива под названием x значение 101
