С.А. Григорьев
Для реализации циклических алгоритмов, т.е. алгоритмов, содержащих многократно повторяющиеся одинаковые операции, применяются специальные операторы цикла. В Паскале есть три вида циклов: FOR, WHILE и REPEAT. Оператор цикла FOR записывается в виде:
FOR переменная:=начальное значение TO конечное значение DO
оператор/блок
или
FOR переменная:=начальное значение DOWNTO конечное значение DO
оператор/блок.
Здесь переменная - любая переменная порядкового типа, называемая в таком контексте переменной цикла, начальное значение и конечное значение - выражения того же типа (исключение, как всегда делается для разнотипных целочисленных переменных). Цикл FOR выполняется следующим образом: переменной цикла присваивается начальное значение, после чего выполняется тело цикла (оператор или блок, стоящий после DO). Два этих действия вместе составляют один шаг цикла. Затем переменной цикла присваивается следующее (в цикле FOR ... TO) или предыдущее (в цикле FOR ... DOWNTO) значение (вспомним функции Succ и Pred) и выполняется следующий шаг цикла. Так происходит до тех пор, пока значение переменной цикла не станет больше (FOR...TO) или меньше (FOR...DOWNTO) конечного значения. Цикл FOR может не выполниться ни разу, если начальное значение больше конечного в цикле FOR...TO или меньше конечного в цикле FOR...DOWNTO. Запишем два примера использования цикла FOR : вычислим сумму квадратов натуральных чисел от 1 до N.
VAR i : Word;
CONST s : Real = 0; N = 22;
BEGIN FOR i:=1 TO N DO s:=s+SQR(i); WRITELN('сумма=',s); END.
и выведем на экран символы с номерами от 32 до 255
VAR c : Char;
BEGIN FOR c:=' ' TO #255 DO WRITE(c); WRITELN; END.
Второй тип цикла - цикл WHILE - записывается в виде:
WHILE логическое выражение DO оператор/блок
Здесь логическое выражение - любое выражение типа Boolean. Цикл выполняется следующим образом : вычисляется логическое выражение и, если оно истинно, выполняется тело цикла, в противном случае цикл заканчивается. Очевидно, что цикл WHILE может как не выполниться ни разу, так и выполняться бесконечное количество раз (в последнем случае говорят, что программа зациклилась). Запишем две предыдущие задачи, используя цикл WHILE :
CONST i : Word = 1; s : Real = 0; N = 22;
BEGIN WHILE i<=N DO BEGIN s:=s+SQR(i); INC(i); END;
WRITELN('сумма=',s);
END.
VAR c : Char;
BEGIN c:=Pred(' ');
WHILE c<#255 DO BEGIN c:=Succ(c); WRITE(c); END;
WRITELN;
END.
В качестве упражнения, подумайте, почему программа
VAR c : Char;
BEGIN c:=' ';
WHILE c<=#255 DO BEGIN WRITE(c); c:=Succ(c); END;
WRITELN;
END.
оказывается зацикленной.
Третий тип цикла - REPEAT - записывается в виде:
REPEAT операторы UNTIL логическое выражение;
Если тело цикла REPEAT содержит больше одного оператора, нет необходимости использовать блок, поскольку сами ключевые слова REPEAT и UNTIL являются в данном случае логическими скобками. Перед UNTIL можно не ставить ";". Цикл REPEAT выполняется так : сначала выполняется тело цикла, затем вычисляется логическое выражение, и если оно истинно, цикл заканчивается. Таким образом, цикл REPEAT всегда выполняется хотя бы один раз и так же, как и WHILE, подвержен зацикливанию. Запишемнашипримерыциклом REPEAT :
CONST i : Word = 1; Real = 0; N = 22;
BEGIN REPEAT s:=s+SQR(i); INC(i) UNTIL i>N;
WRITELN('сумма=',s);
END.
VAR c : Char;
BEGIN c:=Pred(' ');
REPEAT c:=Succ(c); WRITE(c) UNTIL c=#255;
WRITELN;
END.
Из приведенных примеров очевидно, что любой циклический алгоритм можно записать любым видом цикла, все они взаимозаменяемы и выбираются программистом в соответствии с его вкусами, однако можно порекомендовать в тех случаях, когда количество шагов цикла известно заранее, использовать цикл FOR.
В последней версии языка Паскаль появились процедуры BREAK и CONTINUE, аналогичные операторам break и continue языка С. Процедура BREAK приводит к немедленному окончанию цикла, в котором она вызвана. Вызов процедуры CONTINUE приводит к немедленному переходу к следующему шагу цикла. Запишемнашипримеры, используя BREAK :
CONST i : Word = 1; s : Real = 0; N = 22;
BEGIN WHILE TRUE DO BEGIN
s:=s+SQR(i); INC(i); IF i>N THEN BREAK; END;
WRITELN('сумма=',s);
END.
VAR c : Char;
BEGIN c:=Pred(' ');
REPEAT c:=Succ(c); WRITE(c); IF c=#255 THEN BREAK UNTIL FALSE;
WRITELN;
END.
Чтобы привести осмысленный пример использования процедуры CONTINUE, изменим условие второй задачи следующим образом: вывести на экран все символы с 32-го по 255-й, не являющиеся русскими буквами.
VAR c : Char;
BEGIN FOR c:=' ' TO #255 DO BEGIN
IF (c>='А')AND(c<='Я')OR(c>='а')AND(c<='п')OR
(c>='р')AND(c<='я') THEN CONTINUE;
WRITE(c);
END;
WRITELN;
END.
Впрочем, последнюю задачу, очевидно, можно решить проще:
VAR c : Char;
BEGIN FOR c:=' ' TO #255 DO BEGIN
IF NOT((c>='А')AND(c<='Я')OR(c>='а')AND(c<='п')OR
(c>='р')AND(c<='я')) THEN WRITE(c);
WRITELN;
END.
Другие работы по теме:
Отчет 32 с
Пектральная теория операторов, методы гомогенизации, псевдодифференциальные операторы, разностные операторы, квантовая теория рассеяния, дифракция электромагнитных волн
Эрмитовы операторы
Рассмотрение понятия тождественного (единичного) оператора. Анализ методов решения линейных однородного и неоднородного уравнений. Ознакомление с определением эрмитовости оператора. Доказательство теоремы о свойствах ортогональности собственных функций.
Циклы в Паскале
Операторы цикла, присутствующие в языках программирования. Простой арифметический оператор цикла Паскаля, управление циклом с помощью переменной порядкового типа. Арифметический оператор цикла Паскаля с произвольным шагом, оператор цикла с предусловием.
Выражения и Операторы
Выражения. Операторы Выражения. Пустой оператор. Блоки. Операторы if. Операторы switch. Оператор while. Оператор for. Описания.
Основные операторы языка Turbo-Paskal. Процедуры и функции
Принцип работы основных операторов языка программирования Turbo-Paskal: оператор присваивания, выбора Case, безусловного перехода, цикла, уловный, составной. Формальное описание и вызов функции и процедуры. Требования к списку фактических параметров.
Операторы ввода-вывода
Простейший оператор ввода в Паскале - оператор READ, он записывается в виде: READ(имя,имя,...); где имя - имена переменных или типизированных констант. Вводимые значения задаются в виде допустимых в Паскале констант.
Лекция по паскалю
Алгоритмический язык Паскаль Программа на Р записывается в виде последовательности символов: заглавные и прописные латинские буквы; арабские цифры;
Лабораторная работа №7
Цель работы: Получение навыков реализации циклических алгоритмов с неизвестным числом повторений цикла, операторов цикла с предусловием и постусловием и итерационных циклических алгоритмов.
Лабараторная работа №8
Цель работы: Получение навыков реализации циклических алгоритмов с неизвестным числом повторений цикла, операторов цикла с предусловием и постусловием и итерационных циклических алгоритмов.
Операторы цикла
Командой повторения или циклом называется такая форма организации действий, при которой одна и та же последовательность действий повторяется до тех пор, пока сохраняется значение некоторого логического выражения.
Создание графических объектов с помощью псевдографики
Основы работы на языке высокого уровня Turbo Pascal. Основное оборудование и программное обеспечение. Операторы, необходимы для работы в графической среде Turbo Pascal. Запуск графического режима. Текст программы в графической среде Turbo Pascal.
Оператор цикла
Применение циклической управляющией структуры для организации многократного выполнения некоторого оператора. Конструкция цикла: заголовок и тело, и алгоритм выполнения операторов while, do while и for. Отличия циклов с постусловием и предусловием.
Новые операторы языка манипулирования данными (DML)
CTE - выражения для упрощения читаемости запросов. Однократный вызов CTE и использование CTE для рекурсивного прохода по дереву. Операторы Pivot, Unpivot, Apply. Функции ранжирования. Создание хранимой процедуры с использованием нового обработчика ошибок.
Игра "Виселица"
Разработка программы "Виселица" с использованием программной среды Visual Basic и средств объектно-ориентированного программирования: программные требования, описание алгоритма, блок-схема программы и дополнительной процедуры. Листинг программы.
Знакомство с фрактальной графикой
Основы создания фрактальных композиций при помощи среды программирования Паскаль. Сущность и основа фрактальной графики. Графические возможности и операторы для рисования геометрических фигур в среде Паскаль. Примеры обозначения цветов на языке Паскаль.
Программирование на алгоритмическом языке Бейсик
Алгоритм решения задачи: расположение значений ветора в порядке возрастания методом "Всплывающих пузырьков". Блок-схема алгоритма решения задачи. Описание блок-схемы, распечатка программы. Операторы: rem, dim, print, input, lprint using, for-next.
Операторы языка Си
Характеристики операторов языка Си. Операторы безусловного и условного перехода: if, if-else, if-else if. Оператор переключатель switch. Оператор цикла с предусловием while, постусловием do-while. Упрощение логических выражений, взаимозаменяемость циклов.
Операторы цикла в языке программирования Си++"
Рассмотрение принципов работы операторов, реализующих циклические алгоритмы: while (выполнение условия, пока заданное выражение истинное), do-while, for, break (прекращение работы из-за обнаружения ошибки), continue (пропуск "оставшейся" части итерации).
Разработка транслятора в среде Java и С+
Общая характеристика и оценка возможностей языка программирования си-шарп, его сходные и отличительные черты от С++ и Java. Разработка с помощью данного языка программирования лексического и синтаксического анализатора. Составление таблиц разбора.
Метки. Оператор GOTO. Процедура Halt
С.А. Григорьев Операторы в Паскале могут быть помечены. Метки - это идентификаторы, или целые числа от 0 до 9999, они могут записываться перед любым выполняемым оператором и отделяются от него двоеточием. Оператор может иметь любое количество меток. Все метки, использованные в программе, должны быть описаны в разделе описаний с ключевым словом LABEL.
Условный оператор. Блок. Оператор выбора
С.А. Григорьев Условный оператор в Паскале записывается в виде: IF логическое выражение THEN оператор/блок [ELSE оператор/блок] логическое выражение - это любое выражение, значение которого имеет тип Boolean, блок - это последовательность операторов, заключенная в логические скобки : BEGIN операторы END; .
Операторы Turbo Pascal 7
Операторы Turbo Pascal Содержание 1. Операторы ввода и вывода информации. 2. Операторы языка ТР.7. 2.1 Составной оператор Begin ... end. 2.2 Условный оператор If.
Паскаль для начинающих
Паскаль для начинающих Основы грамматики в таблицах и примерах Pascal (Паскаль) - язык программирования общего назначения. Создан в 1970 году специалистами Технического Университета в Цюрихе (ETH, Zurich) под руководством профессора Никлауса Вирта (Niklaus Wirth). После появления языка Pascal были созданы новые промышленные версии языка, а также языки-потомки, которые сохраняют основные синтаксические и семантические свойства языка Вирта: Modula, Turbo Pascal, Object Pascal (Delphi), Component Pascal (Oberon-2), TMT Pascal, Free Pascal, Zonnon, Ada.
Программирование в MATLAB
Кафедра: Информационные технологии ПРОГРАММИРОВАНИЕ В MATLAB Операторы MATLAB Операторы цикла Цикл Синтаксис for count=start:step:final команды MATLAB
Алгоритмический язык Паскаль
Программа на Р записывается в виде последовательности символов: заглавные и прописные латинские буквы; арабские цифры; знаки препинания ( : ; , . ) знаки операций.
Свойства вирусов
Text Text Graphics ВИРУСЫ Graphics Штамм H5N1 вируса птичьего гриппа Graphics Вирус гриппа. Graphics Схема строения вируса.