ЦИКЛЫ Преподаватель информатики КГБОУ СПО «Барнаульский государственный педагогический колледж» Жиляева Ирина Петровна

Август 26, 2022

Главная
Информатика
ЦИКЛЫ Преподаватель информатики КГБОУ СПО «Барнаульский государственный педагогический колледж» Жиляева Ирина Петровна

Содержание

2. Прямой цикл For :=А to В do ; где А - , В - ; A≤B.
3. Найти количество четных чисел в диапазоне от 20 до 100? Program zadacha1; Var I, k: Integer;
4. Найти количество цифр в веденном n-значном натуральном числе. Пусть дано семизначное число: 5 4 8 9
5. Найти количество цифр в веденном n-значном натуральном числе. Проблема? Когда нужно остановиться? Если число n-значное, то
6. Пока есть желание, возможность и здоровье делай: посещай занятия спортом.
7. Спортсмен стоит на старте. На финише – тренер. Спортсмен добегает до финиша, тренер у него спрашивает:
9. Синтаксис оператора: while do ; Блок – схема: Цикл с предусловием
10. program kolichestvo_zifr; var n, k: integer; begin cls; write ('Введите натуральное n-значное число - '); readln(n);
11. Синтаксис оператора: Блок – схема: repeat until ; Цикл с постусловием
12. program kolichestvo_zifr; var n, k: integer; begin cls; write ('Введите натуральное n-значное число - '); readln(n);
13. Цикл работает, пока условие истинно (пока True). Условие пересчитывается каждый раз при входе в цикл. Цикл
14. Задание 1. Сколько раз выполняется цикл? a := 5; b := 7; while a 1 б)
15. Задание 1. Сколько раз выполняется цикл? г) a := 1; b := 3; while a д)
16. Задание 2. Сколько раз выполняется цикл? а) a := 5; b := 7; repeat a :=
17. Задание 2. Сколько раз выполняется цикл? г) a := 1; b := 3; repeat b :=
18. Задача 1. Дано натуральное n-значное число. Верно ли, что сумма его цифр больше 10. Задача 2.
20. Скачать презентацию

Слайд 2

Прямой цикл
For <параметр>:=А to В do <тело цикла>;
где А - <начальное

значение>,
В - <конечное значение>; A≤B.
Обратный цикл
For <параметр>:= А downto В do <тело цикла>; A≥B.

Цикл с параметром

Слайд 3

Найти количество четных чисел в диапазоне от 20 до 100?
Program zadacha1;
Var

I, k: Integer;
Begin
Cls;
For I:=20 To 100 Do If I mod 2=0 then k:=k+1;
Writeln(‘Количество четных чисел в диапазоне от 20 до 100 = ‘,k);
End.

Слайд 4

Найти количество цифр в веденном n-значном натуральном числе.
Пусть дано семизначное

число:

Счетчик

Счетчик = 7

Отсекаем последовательно последнюю цифру числа.

Увеличиваем при этом каждый раз счетчик на 1.

Идея решения:

Слайд 5

Найти количество цифр в веденном n-значном натуральном числе.
Проблема?
Когда нужно остановиться?

Если число n-значное, то неизвестно: сколько шагов нужно сделать.

Когда число (после очередного отсекания цифры) станет равным нулю.

Слайд 6

Пока есть желание, возможность и здоровье
делай:
посещай занятия спортом.

Слайд 7

Спортсмен стоит на старте. На финише – тренер. Спортсмен добегает до

финиша, тренер у него спрашивает: «Устал?». Если спортсмен говорит: «Нет», то снова бежит от старта к финишу, а иначе бег заканчивается.

Слайд 8

Слайд 9

Синтаксис оператора:
while <условие> do <тело цикла>;
Блок – схема:
Цикл с

предусловием

Слайд 10

program kolichestvo_zifr;
var n, k: integer;
begin
cls;
write ('Введите натуральное n-значное число - ');
readln(n);
k

:= 0;
while n <> 0 do
begin
n := n div 10;
k := k + 1;
end;
writeln ('В числе ', n, ' количество цифр равно ', k);
end.

Начало

Ввод n

k:=0

n<>0

n:=n div 10
k:=k+1

Вывод k

Конец

нет

да

Найти количество цифр в веденном n-значном натуральном числе.

Слайд 11

Синтаксис оператора: Блок – схема:
repeat
<тело цикла>
until <условие>;
Цикл с постусловием

Слайд 12

program kolichestvo_zifr;
var n, k: integer;
begin
cls;
write ('Введите натуральное n-значное число - ');
readln(n);
k

:= 0;
repeat
n:=n div 10;
k:=k+1;
until n = 0;
writeln ('В числе ', n, ' количество цифр равно ', k);
end.

Начало

Ввод n

k:=0

n=0

n:=n div 10
k:=k+1

Вывод k

Конец

нет

да

Найти количество цифр в веденном n-значном натуральном числе.

Слайд 13

Цикл работает, пока условие истинно (пока True). Условие пересчитывается каждый раз

при входе в цикл.

Цикл работает, пока условие ложно (пока False). Условие пересчитывается каждый раз при выходе из цикла.

Цикл завершается, когда условие становится ложным (False).

Цикл завершается, когда условие становится истинным (True).

Тело цикла может не выполниться ни разу, если исходное значение условия при входе в цикл False.

Если в теле цикла требуется выполнить более одного оператора, то необходимо использовать составной оператор begin…end.

Тело цикла обязательно выполнится хотя бы один раз, независимо от условия.

Использование составного оператора не требуется, так как их роль играют служебные слова repeat…until.

До начала цикла должны быть сделаны начальные установки переменных, управляющих условием цикла, для корректного входа в цикл.

В теле цикла должны присутствовать операторы, изменяющие переменные условия так, чтобы цикл через некоторое число повторений завершился.

Можно использовать сложные условия.

Цикл с предусловием While (пока условие истинно)

Цикл с постусловием Repeat (до истинности условия)

Слайд 14

Задание 1. Сколько раз выполняется цикл?
a := 5; b :=

7;
while a < b do a := a + 1;

б) a := 5; b := 7;
while a < b do a := a + b;

бесконечно

в) a := 5; b := 7;
while a > b do a := a + 1;

Варианты ответов:

бесконечно

Слайд 15

Задание 1. Сколько раз выполняется цикл?
г) a := 1; b := 3;

while a < b do b := a - b;

д) a := 1; b := 3;
while a < b do a := a - 1;

Варианты ответов:

бесконечно

Варианты ответов:

бесконечно

Слайд 16

Задание 2. Сколько раз выполняется цикл?
а) a := 5; b := 7;

repeat a := a + 1; until a > b;

б) a := 5; b := 7;
repeat a := a + b; until a > b;

в) a := 5; b := 7;
repeat a := a + b; until a < b;

Варианты ответов:

бесконечно

Слайд 17

Задание 2. Сколько раз выполняется цикл?
г) a := 1; b := 3;

repeat b := a - b; until a < b;

д) a := 1; b := 3;
repeat a := a + 2; until a < b;

бесконечно

Варианты ответов:

Слайд 18

Задача 1. Дано натуральное n-значное число. Верно ли, что сумма его цифр больше

10.
Задача 2. Дано натуральное n-значное число. Определить, сколько раз в нем встречается цифра, равная последней.
Задача 3. Составить программу нахождения количества делителей числа n (значение n вводится с клавиатуры).
Задача 4. Дана непустая последовательность целых чисел, оканчивающаяся нулем. Найти сумму всех чисел последовательности.

Задача 1. Дано натуральное число. Верно ли, что это число четырехзначное?
Задача 2. Известны оценки по информатике 15 учеников класса. Выяснить, есть ли среди них двойки.
Задача 3. Даны вещественные числа b1, b2, b3,,…,b9. Определить среднее арифметическое тех из них, которые больше 10.
Задача 4. Известна масса каждого из 15 учеников класса. Верно ли, что масса самого тяжёлого из них превышает массу самого лёгкого более, чем в два раза?

Индивидуальные задания для компьютерного практикума

Цикл с предусловием

Цикл с постусловием

ЦИКЛЫ Преподаватель информатики КГБОУ СПО «Барнаульский государственный педагогический колледж» Жиляева Ирина Петровна

Содержание

Прямой циклFor <параметр>:=А to В do <тело цикла>;где А - <начальное

Найти количество четных чисел в диапазоне от 20 до 100?Program zadacha1;Var

Найти количество цифр в веденном n-значном натуральном числе. Пусть дано семизначное

Найти количество цифр в веденном n-значном натуральном числе. Проблема?Когда нужно остановиться?

Пока есть желание, возможность и здоровье делай: посещай занятия спортом.

Спортсмен стоит на старте. На финише – тренер. Спортсмен добегает до

Синтаксис оператора: while <условие> do <тело цикла>; Блок – схема:Цикл с

program kolichestvo_zifr;var n, k: integer;begincls;write ('Введите натуральное n-значное число - ');readln(n);k

Синтаксис оператора: Блок – схема:repeat <тело цикла>until <условие>;Цикл с постусловием

program kolichestvo_zifr;var n, k: integer;begincls;write ('Введите натуральное n-значное число - ');readln(n);k

Цикл работает, пока условие истинно (пока True). Условие пересчитывается каждый раз

Задание 1. Сколько раз выполняется цикл? a := 5; b :=

Задание 1. Сколько раз выполняется цикл?г) a := 1; b := 3;

Задание 2. Сколько раз выполняется цикл?а) a := 5; b := 7;

Задание 2. Сколько раз выполняется цикл?г) a := 1; b := 3;

Задача 1. Дано натуральное n-значное число. Верно ли, что сумма его цифр больше

Похожие презентации

Прямой цикл
For <параметр>:=А to В do <тело цикла>;
где А - <начальное

Найти количество четных чисел в диапазоне от 20 до 100?
Program zadacha1;
Var

Найти количество цифр в веденном n-значном натуральном числе.
Пусть дано семизначное

Найти количество цифр в веденном n-значном натуральном числе.
Проблема?
Когда нужно остановиться?

Пока есть желание, возможность и здоровье
делай:
посещай занятия спортом.

Синтаксис оператора:
while <условие> do <тело цикла>;
Блок – схема:
Цикл с

program kolichestvo_zifr;
var n, k: integer;
begin
cls;
write ('Введите натуральное n-значное число - ');
readln(n);
k

Синтаксис оператора: Блок – схема:
repeat
<тело цикла>
until <условие>;
Цикл с постусловием

program kolichestvo_zifr;
var n, k: integer;
begin
cls;
write ('Введите натуральное n-значное число - ');
readln(n);
k

Задание 1. Сколько раз выполняется цикл?
a := 5; b :=

Задание 1. Сколько раз выполняется цикл?
г) a := 1; b := 3;

Задание 2. Сколько раз выполняется цикл?
а) a := 5; b := 7;

Задание 2. Сколько раз выполняется цикл?
г) a := 1; b := 3;