МОУ СОШ 731 Циклический алгоритм Команда « Повторять ». Команда « Повторять ».

МОУ СОШ 732 Определение: Циклом называется такая форма организации действий, при которой одна и та же последовательность действий совершается несколько раз (или ни разу) до тех пор, пока выполняется некоторое условие.

МОУ СОШ 733 Команда «Повторять». ЭВМ выполняет тело цикла (СЕРИЮ КОМАНД); проверяет УТВЕРЖДЕНИЕ, записанное после служебного слова until: Если УТВЕРЖДЕНИЕ верно (ответ: "ДА "), то выполнение цикла завершается и ЭВМ начинает выполнять команды, записанные после строки с until. Если же УТВЕРЖДЕНИЕ неверно ( ответ: "НЕТ "), то все начинается снова (пункт 1).

МОУ СОШ 734 Команда « Повторять ». Повторять до условия Команды цикла REPEAT команда 1; команда 2; команда 3; ………….. команда N; UNTIL условие выхода из цикла; «Сначала сделай, потом проверь». Команды цикла НЕТ ДА До условие

МОУ СОШ 735 Правило работы. Исполнитель выполняет команды цикла. В конце цикла проверяется условие. Если условие выполнено, то исполнитель переходит к следующей команде. Если условие не выполнено, то исполнитель возвращается на выполнение команд цикла. ПРИМЕЧАНИЕ. 1.Команды цикла в команде «до» выполняются, по крайней мере, один раз, так как оценка условия делается после команд цикла. В тоже время в цикле «пока» тело цикла может пропускаться, если условие ложно уже в начале. 2.В команде «пока» пишется условие вхождения в цикл, а в команде «до» условие выхода из цикла.

МОУ СОШ 736 Примечание: Этот цикл (REPEAT) называют "циклом с постусловием", желая подчеркнуть, что, в отличие от цикла while, утверждение проверяется после выполнения тела цикла. -> Циклы с условием делятся на циклы с предусловием и на циклы с постусловием

МОУ СОШ 737 Пример 1. Предположим, нужно написать программу, в которой мы будем вводить с клавиатуры числа, и подсчитывать их сумму.

МОУ СОШ 738 program ciklih4; uses crt; var sum, A:real; beginclrscr;SUM:=0;A:=0;repeatsum:=sum+A; write (Введите число:); readln (A); until A

МОУ СОШ 739 В строке 3 запишем 2 переменные: «SUM» – для хранения суммы и «A» для хранения значения введенного нами числа. В строке 6 обнуляем сумму. Каждый раз, когда в той или иной программе следует подсчитать сумму чего-нибудь, нужно сначала обнулить эту сумму. В строке 7 указываем первоначальное значение для переменной «A». В строке 8 записываем оператор цикла Repeat (от англ. «повторять»). Все действия, которые записаны после оператора Repeat (строка ) будут выполняться до тех пор, пока не выполнится условие в строке 12 (Until в пер с англ. «до»), т.е. пока переменная «A» не станет отрицательным числом. Таким образом, получается, что в цикле выполняется 3 действия (строка ). Сначала подсчитывается сумма (строка 9). Она, первоначальна, равна 0, т.к. sum=0 и A=0. Затем выводится сообщение на экран (строка 10), затем мы вводим с клавиатуры какое-нибудь число, и оно записывается в переменную «A». Если мы вводим положительное число, то опять подсчитывается сумма (строка 9), только теперь значение переменной «A» равно не 0, а тому числу, которое мы введем с клавиатуры. Соответственно, и сумма (sum) увеличится на это число.

МОУ СОШ 7310

МОУ СОШ 7311 При вводе положительных чисел, программа будет продолжать работать. Как только мы введем отрицательное число, цикл перестанет работать, и на экран выведится сумма всех введенных с клавиатуры чисел.

МОУ СОШ 7312 Дополнение: Конструкция Repeat...Until подобна операторным скобкам Begin...End. Поэтому перед Until не обязательно ставить точку с запятой. Т. е. в конце строки 11 можно пропустить точку с зяпятой без каких-либо последствий для программы. Следует сказать, что для решения одних и тех же задач программирования можно использовать как циклы с предусловием, так и циклы с постусловием. Выбор того или иного варианта во многом будет зависеть от ваших личных предпочтений.

МОУ СОШ 7313 Практическая работа 5.1 С помощью языка программирования pascal вычислить сумму квадратов натуральных чисел до тех пор, пока квадрат очередного числа не превысит 81 /использовать при решении оператор с постусловием REPEAT/

МОУ СОШ 7314 Практическая работа 5.2 Написать программу на языке Pascal, где необходимо ввести с клавиатуры N чисел, а затем найти из них наибольшее и вывести его.

МОУ СОШ 7315 Комментарии к работе 5.2 Для решения этой задачи предлагается следующий алгоритм. Ввести первое число в переменную Max. Ввести следующее число в переменную Next. Если Next>Max, то Max:=Next. Пункты 2 и 3 повторять, пока не будут введены все числа. Вывести значение переменной Max.