Содержание
-
Знай и любиоператоры цикла
Зpp PA S C A L
-
С предусловием С послеусловием Со счётчиком Зpp PA S C A L
-
Действие оператора for:
Организует многократное исполнение тела цикла I:=I НАЧ ТЕЛО ЦИКЛА I:=I +1 I>I КОН ДА НЕТ Выход из цикла Зpp PA S C A L
-
ЗАПОМНИ термины:
СЧЁТЧИК( или параметр) цикла – искусственно вводимый объект для организации работы цикла; настройка начального и конечного значения счётчика задаёт количество раз работы цикла; ТЕЛО ЦИКЛА – оператор(может быть составной) для многократного исполнения; ПРОХОД ПО ЦИКЛУ – однократное исполнение тела цикла; ЗАЦИКЛИВАНИЕ – бесконечное исполнение цикла(это очень плохо!); Зpp PA S C A L
-
Синтаксис Оператора цикла Со счётчиком
For := to do ; Присвоить счётчику начальное значение вставить оператор Указать конечное значение счётчика Примеры: For j:=1 to 20 do x:=x-1; For k:=-5 to 0 do begin S:=s*p; write(s) end; For avatar:=a+b to c-d do if (avatar mod 2)=0 then write(avatar:6); Зpp PA S C A L
-
Условия корректной работы оператора цикла:
Счётчик – объект перечисляемого типа! Шаг изменения счётчика задается атоматически +1(с to) или -1(с downto)! Пусть А-нач.Знач. Счётчика, В-кон.Знач. Счётчика; тогда количество проходов по телу цикла с to с downto А=В 0 0АВ 0 А-В+1 В теле цикла изменять значение счётчика нельзя! Работает правило begin……….end для тела цикла Зpp PA S C A L
-
Примерыиз жизни:
For i:=1 to 99 do write(i*i:6); For j:=50 downto 1 do writeln(2*j); A:=2;b:=102; For k:=a to b do if (k mod 3)=0 then p:=p+1; For l:=‘a’ to ‘я’ dowrite(ord(l):5); For m:=1 to length(str) do writeln(copy(str),m,1); For n:=‘z’ to ‘a’ do str:=str+n; SUM:=0; For p:=10 to 101 do begin read(S);SUM:=SUM+S end; write(SUM); For r=32 to 255 do writeln(chr(r),’-’,r:4); Progress:=1; Q:=1.21; For t:=33 downto 1 do write(progress*Q); For s:=1 to 128 do If (s mod 10)=0 then write(‘*’) else write(‘ ‘); Зpp PA S C A L
-
Найти позиции буквы в фразе
Program letter; Var fr:string; buk:char; i,j,L:byte; Label Mm; Begin write(‘введи фразу’); readln(fr); write(‘введи букву’);readln(buk); L:=length(fr); j:=0; Mm: i:=pos(buk,fr); If io then begin j:=j+i; write(j:4); fr:=copy(fr,i+1,L-i); goto Mm end; Write(‘end’); End. Зpp PA S C A L
-
Действие оператора с предусловием : Условие ЛОЖНО? начальная установка ТЕЛО ЦИКЛА Условие ИСТИННО? да Выход из цикла да Логика работы цикла: - пока условие ИСТИННОттттвыполняется тело цикла; - ЛОЖНОСТЬ условия ьььь завершает цикл;
-
Применение операторав задачах:
Задача 1 Автомат для оплаты услуг принимает монеты любого достоинства и выдает сдачу. Надо прекратить прием монет, как только денежная сумма станет не меньше суммы оплаты услуг, и выдать сдачу. Задача 2 Построить расписание движения автобуса, если известно время начала и конца работы маршрута, длительность рейсав один конец ,время отдыха на конечных остановках. Задача 3 Для уравнения с двумя неизвестными подобрать корень с заданной точностью( например , 0.001).
-
Синтаксис оператора:
whiledo ; Условие исполнения цикла Тело цикла(работает правило операторных скобок) Например: While x>= y dobegin x:=x-1;y:=y+1; end;
-
Листинг работы цикла:
X:=10; y:=2; while X>=Y do begin X:=X-1;Y:=Y+1 end; 9 Тело цикла исполнится 5 раз ! Выход изцикла Запуск цикла истина 3 истина 8 4 истина 7 5 истина 6 6 истина 5 7 ложь
-
Листинг работы цикла: X:=2; Y:=2; while X>=Y do begin X :=X-1;Y :=Y+1 end; Запуск цикла 2 2 истина 1 3 ложь Выход из цикла Тело цикла исполнится 1 раз !
-
Листинг работы цикла: X:=2; y:=2; while X>=Y do begin X:=X+1;Y:=Y+1 end; 2 2 Запуск цикла истина 3 3 истина 4 4 истина 5 5 истина 6 6 истина 7 7 Произошло зацикливание ! Цикл не завершается
-
Листинг работы цикла: X :=2; Y :=3; while X>=Y do begin X :=X+1;Y :=Y+1 end; Запуск цикла 2 3 ложь Выход из цикла Тело цикла не исполнится ни разу !
-
Условия корректной работы оператора цикла: Необходимо обеспечить запуск цикла:тело цикла исполнится хотя бы один раз, если при запуске цикла условие ИСТИННО! Необходимо обеспечить завершение цикла:в ходе работы цикла условие должно изменить свое значение на ЛОЖЬ! 3. Количество проходов по телу цикла задается :-начальной установкой переменных, участвующих vvв цикле;-изменением значений переменных в телецикла;
-
Примеры из жизни:
S := 0; While S 0 then score := score + 1; end; x := 0; eps :=0.01; While F1-F2 >eps do begin F2:=F1; F1:=x*x*x +x*x +5*x -12; x := x+eps; end; i := 1; a := a0; While i50 do begin a:=a+1; if a mod 2= 0 then i := i+1; write( a:5);
-
Построить программу для решения задачи:
Разменный автомат имеет набор монет достоинствомk1, k2 и k3, причем k1>k2>k3, k3= 1 рубль. Предложить вариант размена заданной денежной суммы, которая поступает от клиента ввиде набора купюр,с минимальным количеством выдаваемых монет. Признак окончания ввода купюр – введена сумма в 0 рублей.
-
З а п о м н и:
1- В цикле WHILE условие ПРОДОЛЖАЕТ цикл. 2- Количество проходов по телу цикла bbbзаранее ттнеизвестно. 3- Логика работы цикла: -- пока условие ИСТИННОттттbbbbbbbbbbbbbbbbвыполняется тело цикла; -- ЛОЖНОСТЬ условия ьььь ииииbbbbbbbbbbbbbbbbзавершает цикл; 4 - Для тела цикла работает правило операторных скобок
Нет комментариев для данной презентации
Помогите другим пользователям — будьте первым, кто поделится своим мнением об этой презентации.