Программирование на языке Pascal

На главную

Введение

Алгоритм

Язык Pascal

Переменные, константы, типы

Выражения языка Pascal

Условные операторы языка Pascal

Циклы языка Pascal

Массивы языка pascal

Записи в языке Pascal

Строковый тип данных в языке Pascal

Процедуры и функции для работы со строками в языке Pascal

Лабораторная работа № 1 «Алгоритмы ветвления»

Лабораторная работа № 2 «Циклические алгоритмы»

Лабораторная работа № 3 «Обработка массивов»

Лабораторная работа № 4 «Работа со строками и записями»

Список литературы

Циклы в языке Pascal

Цикл определяет совокупность многократно повторяемых операций, которую называют телом цикла. Выход из цикла осуществляется по условию. Обычно среди циклов выделяют три вида:

  • цикл с предусловием – условие продолжения цикла объявляется перед телом цикла;
  • цикл с постусловием – условие окончания цикла расположено после тела цикла;
  • цикл FOR – использует переменную, значение которой инициализируется перед началом выполнения и после каждого повторения тела цикла увеличивается на размер шага цикла FOR до тех пор, пока не станет больше максимального значения.
Примечание: условие продолжение цикла определяет до каких пор цикл должен повторяться, а условие окончания цикла – когда заканчивать

Листинг 4. Реализация циклов в Pascal
program listing_4;
uses crt; (* подключаем библиотеку *)
const y = 1; b = 4;
var x: integer;
begin
  clrscr; (* очистка экрана *)
  x := 1;
  while x <= 5 do begin (* цикл с предусловием *)
   writeln(x);
   inc(x)
  end;
  x := 1;
  repeat (* цикл с постусловием *)
    writeln(x);
   inc(x)
  until x > 5;
  for x:=1 to 5 do (* цикл for *)
   writeln(x)
end.

В листинге 4 циклы реализованы в порядке соответствующем их описанию выше, т.е. цикл с предусловием (цикл while-do), цикл с постусловием (цикл repeat-until) и цикл FOR. Все три цикла выводят на экран числа от 1 до 5ти.