2,5 - 0,1 345 цел M, N, K вещ A, B, X вещ таб Т[1:12] Т а б л и ц ы Константы Переменные К о м а н д ы Ц и к л с п а р а м е т р о м Для k от 1 до 10 повторять. - презентация

1 2,5 - 0,1 345 цел M, N, K вещ A, B, X вещ таб Т[1:12] Т а б л и ц ы Константы Переменные К о м а н д ы Ц и к л с п а р а м е т р о м Для k от 1 до 10 повторять нц S := S + k кц пока k < 10 повторять нц S := S + k кц если A > B то... иначе... Ц и к л – п о к аВ е т в л е н и е ввод А, В Данные Операции Функции Д е й с т в и я над данными вывод Х Х : = А + В Присваивание Вывод В в о д М а с с и в ы Переменные О п е р а т о р ы if then else В е т в л е н и е read ( ) readln ( ) Операции Функции write ( ) writeln ( ) Вывод Ввод Данные Д е й с т в и я над данными while do Ц и к л – п о к а Ц и к л с параметром for := to do П р и с в а и в а н и еП р и с в а и в а н и е : = var : var : array [ ] of Алгоритмы работы с величинами целые вещественные строковые Константы Язык программирования ПАСКАЛЬ ПРОГРАММНОЕ УПРАВЛЕНИЕ РАБОТОЙ КОМПЬЮТЕРА

2 §39. Программирование циклов Глава 6. Программное управление работой компьютера.

3 Постановка задачи Построение алгоритма Составление про- граммы на языке программирования О т л а д к а и тестирование программы Математическая формализация Проведение расчетов и анализ полученных результатов На этапе постановки задачи необходимо четко определить, что дано и что требуется найти Задача переводится на язык математических формул, уравнений, отношений. ( математическая модель ) используются графические блок-схемы и Алгоритмический язык (АЯ) Существует множество языков и систем программирования. Чтобы составить программу, необходимо знать соответствующий формальный язык. (ПАСКАЛЬ) процесс испытания работы программы и исправление обнаруженных при этом ошибок. Тест – это конкретный вариант значений исходных данных, для которого известен ожидаемый результат.

4 Операция NFRУсловие 1 Ввод N3 2 F := 11 3 R := 11 4 R <= N1 <= 3 да 5 F := F * R1 6 R := R R <= N2 <= 3 да 8 F := F * R2 9 R := R R <= N3 <= 3 да 11 F := F * R6 12 R := R R <= N4 <= 3 нет 14 Вывод 6 «N факториал» F = N! = 1 * 2 *... * N начало ввод N вывод F F : = 1 R : = 1 F := F * R R := R + 1 конец да нет R < N ЦИКЛ – это команда исполнителю многократно повторить указанную последовательность команд. « цикл с предусловием » Пока выполняется условие цикла ( R <= N), повторяется выполнение тела цикла (F := F * R, R := R + 1) алг N ! цел F, N, R нач ввод N F : = 1 R : = 1 пока R <= N, повторять нц F := F * R R := R + 1 кц вывод F кон ТРАССИРОВКА

5 циклические конструкции: (WHILE... DO...), (REPEAT... UNTIL...), (FOR... TO / DOWNTO... DO...). FORTO DOWNTO :=:= DO оператор FOR :=:= DO оператор переменная выражение 1 переменная выражение 1 Имя параметра (счетчика) цикла Начальное значение счетчика цикла выражение 2 параметр цикла Оператор цикла с параметром Оператор цикла с предусловием да нет условие DOWHILE оператор Оператор цикла с постусловием да нет REPEAT UNTIL оператор условие Конечное значение счетчика цикла подробно

6 Для решения одной и той же задачи можно составить несколько вариантов вычислительных алгоритмов на основе применения различных операторов. При этом, чем сложнее задача, тем больше возможных путей ее решения. На данном слайде предлагается четыре варианта программ на языке Паскаль для вычисления N факториала. Это хороший пример для демонстрации всех циклических конструкций, используемых в Паскале. r > n :=:= r1 ; :=:= FF * r ; :=:= rr + 1 ; REPEAT ; UNTIL FORTODO :=:= r1n :=:= FF * r ; DOWNTOFORDO :=:= r1n :=:= FF * r ; PROGRAM VAR READLN : INTEGER n, r, F () ; FAKTORIAL ; n ; BEGIN :=:= F1 ; WRITELN END. () F DOWHILE r <= n :=:= r1 ; BEGIN :=:= FF * r ; :=:= rr + 1 END ; «N факториал» F = N! = N

7 F : = 1 начало да нет конец ввод N вывод F R : = 1 F : = F R R : = R + 1 R < N алг Факториал цел F, N, R ввод N нач кон вывод F нц кц пока R <= N, повторять F := 1 R := 1 F := F R R := R + 1 «N - факториал» F = N! = N «N - факториал» F = N! = N PROGRAM VAR READLN WRITE : INTEGER F, N, R () ; DOWHILE Words ; N ; END. () Введите число букв R <= N :=:= F1 BEGIN ; ; :=:= R1 ; :=:= F F * R :=:= RR + 1 ; END ; WRITELN( ) Из,N, букв можно составить,F, слов

8 Практическая работа Скопировать папку с компьютера учителя \Глава 6\39\ Запустить PascalAlgo Решите задачи.

9 Домашнее задание §39. стр Вопросы и задания.