Паскаль
<<  Циклы с параметром Одномерные массивы  >>
Логические циклы
Логические циклы
Мы познакомимся c организацией логических циклических структур
Мы познакомимся c организацией логических циклических структур
Для чего применяются циклы
Для чего применяются циклы
Заранее не известно количество повторений цикла
Заранее не известно количество повторений цикла
Циклическое повторение блока команд
Циклическое повторение блока команд
Сравнение циклов While и Repeat
Сравнение циклов While и Repeat
Использование цикла While
Использование цикла While
Найти все двузначные числа, кратные 7
Найти все двузначные числа, кратные 7
Program Summa_2
Program Summa_2
Использование цикла Repeat
Использование цикла Repeat
Написать программу, которая «задумывает» число в диапазоне от 1 до 9
Написать программу, которая «задумывает» число в диапазоне от 1 до 9
Program Ugaday_chislo
Program Ugaday_chislo
Найти все цифры и их количество
Найти все цифры и их количество
Program Zifry
Program Zifry
Домашнее задание
Домашнее задание
Итоги урока
Итоги урока
Презентация «Repeat, while». Размер 3819 КБ. Автор: 10a1.

Загрузка...

Repeat, while

содержание презентации «Repeat, while.pptx»
СлайдТекст
1 Логические циклы

Логические циклы

Логические циклы.

2 Мы познакомимся c организацией логических циклических структур

Мы познакомимся c организацией логических циклических структур

На этом уроке мы познакомимся c организацией логических циклических структур на языке Турбо-Паскаль.

3 Для чего применяются циклы

Для чего применяются циклы

Для чего применяются циклы? Как записывается арифметический цикл ? Что такое переменная –счетчик цикла? Какого типа она должна быть? С каким шагом она изменяется?

4 Заранее не известно количество повторений цикла

Заранее не известно количество повторений цикла

При составлении программ часто возникают ситуации, когда 1. Заранее не известно количество повторений цикла; 2. Переменная – счетчик цикла должна изменяться с шагом ? 1. В таких случаях используют. Логические циклы.

5 Циклическое повторение блока команд

Циклическое повторение блока команд

Логические циклы. - Это циклическое повторение блока команд, пока выполняется (или не выполняется) некоторое условие.

6 Сравнение циклов While и Repeat

Сравнение циклов While и Repeat

Сравнение циклов While и Repeat. В цикле While проверка условия выполнения цикла находится в начале цикла, а в Repeat – в конце. Цикл Repeat всегда выполняется хотя бы один раз, а цикл While может не выполнятся ни разу. В цикле While выход из цикла осуществляется, если условие ложно, а в Repeat – если условие истинно. Между словами Repeat и Until можно размещать несколько операторов без Begin и End, а цикл While…do может содержать только один оператор тела цикла; поэтому нужно использовать Begin и End.

7 Использование цикла While

Использование цикла While

Использование цикла While.

8 Найти все двузначные числа, кратные 7

Найти все двузначные числа, кратные 7

Найти все двузначные числа, кратные 7. Program Kratn_7; Uses Crt; Var k: integer; Begin Clrscr; k:=14; While k<=99 do Begin Writeln(k); k:=k+7; end; readln; end. При использовании логических циклов необходимо всегда заботиться о том, чтобы переменная, использующаяся в условии завершения цикла, каким-то образом обязательно изменялась в теле цикла. Это может быть команда присваивания ( как в данной программе) или команда ввода.

9 Program Summa_2

Program Summa_2

Program Summa_2; Uses Crt; Var sum, x: real; K: integer; Begin Clrscr; sum:=0; k:=1; While sum<=10 do Begin Sum:=sum+1/k; k:=k+1; end; Writeln('Kolichestvo elementov=',k); readln; end. При каком количестве слагаемых последовательности их сумма превысит 10?

10 Использование цикла Repeat

Использование цикла Repeat

Использование цикла Repeat.

11 Написать программу, которая «задумывает» число в диапазоне от 1 до 9

Написать программу, которая «задумывает» число в диапазоне от 1 до 9

Написать программу, которая «задумывает» число в диапазоне от 1 до 9 и предлагает пользователю угадать это число за 5 попыток. Пояснения к программе: Компьютер может «задумать» число с помощью функции Random. Количество повторений цикла в этой задаче может быть от 1 до 5 – то есть, заранее не известно. Так как пользователь должен сделать хотя бы одну попытку, то логично использовать команду цикла Repeat…until.

12 Program Ugaday_chislo

Program Ugaday_chislo

Program Ugaday_chislo; const Npop=5; var comp, igrok, n: integer; Begin Randomize; comp:=random(9)+1; Writeln ('Game "Угадай число" '); Writeln (‘Комптьютер загадывает число от 1 до 9’); Writeln (‘Вы должны угадать это число'); Writeln (‘за 5 попыток'); repeat n:=n+1; Write (‘Введите число- '); readln(igrok); until (n=npop) or (comp=igrok); if comp = igrok then Writeln ('Win') else Writeln (' No win Chislo - ',comp); readln; end.

13 Найти все цифры и их количество

Найти все цифры и их количество

Найти все цифры и их количество заданного произвольного целого числа x>0 . Последовательно будем находить целую часть и остаток от деления числа y на 10.Именно остаток от деления будет очередной цифрой x. На каждом шаге будем изменять число y: присваивать ему значение целой части от деления y на 10.Для нахождения количества цифр организуем счетчик, значение которого будет увеличено на 1.Процесс повторяется пока значение числа y не станет меньше 1. Алгоритм: Для того, чтобы не «потерять» заданное число, введем переменную y, значение которой сначала будет =x. С- целая часть от деления числа y на 10 R- остаток от деления y на 10 K- кол-во цифр в числе x.

14 Program Zifry

Program Zifry

Program Zifry; Uses Crt; var x, y, c: longint; r, k: integer; Begin clrscr; Writeln ('Enter zeloe chislo do 10 snakov'); Readln (x); writeln; y:=x; k:=0; Writeln ('Zifry zadannogo chisla:'); repeat r:=y mod 10; c:=y div 10; k:=k+1; y:=c; Writeln (k,' zifra = ',r); until y<1; Writeln ('Chislo - ',x,' coderjit ', k, ' zifr'); readln; end.

15 Домашнее задание

Домашнее задание

Домашнее задание: Выучить конспект 1)Даны числа a, b (a > 1). Получить все члены бесконечной последовательности a, a2, a3, … an пока an <b (while) 2) С клавиатуры вводится произвольная последовательность положительных чисел, за которой следует 0. Определит количество четных чисел.

16 Итоги урока

Итоги урока

Итоги урока: Сегодня мы познакомились с логическими циклами While и Repeat. Узнали об их отличиях и особенностях применения. Рассмотрели примеры использования цикла WHILE. Обратили особое внимание на необходимость изменения в цикле переменной, которая участвует в условии завершения цикла.

«Repeat, while»
Сайт

5informatika.net

115 тем
5informatika.net > Паскаль > Repeat, while.pptx