Презентация Вложенные циклы онлайн
На нашем сайте вы можете скачать и просмотреть онлайн доклад-презентацию на тему Вложенные циклы абсолютно бесплатно. Урок-презентация на эту тему содержит всего 14 слайдов. Все материалы созданы в программе PowerPoint и имеют формат ppt или же pptx. Материалы и темы для презентаций взяты из открытых источников и загружены их авторами, за качество и достоверность информации в них администрация сайта не отвечает, все права принадлежат их создателям. Если вы нашли то, что искали, отблагодарите авторов - поделитесь ссылкой в социальных сетях, а наш сайт добавьте в закладки.
Оцените презентацию от 1 до 5 баллов!
- Тип файла:ppt / pptx (powerpoint)
- Всего слайдов:14 слайдов
- Для класса:1,2,3,4,5,6,7,8,9,10,11
- Размер файла:128.00 kB
- Просмотров:101
- Скачиваний:0
- Автор:неизвестен
Слайды и текст к этой презентации:
№1 слайд
Содержание слайда:
№2 слайд
Содержание слайда: Повторение
№3 слайд
Содержание слайда: Повторение
№4 слайд
Содержание слайда: Вложенные циклы
При решении некоторых задач приходится использовать вложенные циклы. Внутренний и внешний циклы могут быть любыми из трех рассмотренных ранее видов: с параметром, с предусловием или с постусловием.
Правила организации как внешнего, так и внутреннего циклов такие же, как и для простого цикла каждого из этих видов. Но при использовании вложенных циклов необходимо соблюдать следующее условие: внутренний цикл должен полностью укладываться в циклическую часть внешнего цикла.
№5 слайд
Содержание слайда: Задача 1.
Написать программу, которая находит
и выводит на печать все четырехзначные числа abcd, числа a, b, c, d - различные цифры,
для которых выполняется условие:
ab — cd = a + b + c + d.
№6 слайд
Содержание слайда: 1 способ. Перебор всех четырехзначных чисел и проверка для каждого из них выполнения условий.
Var x, a, b, c, d: integer;
Begin
for x := 1000 to 9999 do
begin
a := x div 1000;
b := x div 100 mod 10;
c := x div 10 mod 10;
d := x mod 10;
if (a<>b) and (a<>c) and (a<>d) and (b<>c) and (b<>d) and
(c<>d) and(a*10+b)-(c*10+d)=a+b+c+d then writeln (x);
end;
End.
№7 слайд
Содержание слайда: 2 способ. Перебор всех чеиырех цифр числа и проверка для каждого набора цифр выполнения условий.
Var x, a, b, c, d: integer;
Begin
for a:=1 to 9 do
For b:=0 to 9 do
For c:=0 to 9 do
For d:= 0 to 9 do
if (a<>b) and (a<>c) and (a<>d) and
(b<>c) and (b<>d) and (c<>d) and
((a*10+b)-(c*10+d)=a+b+c+d)
then writeln (a, b, c, d);
End.
№8 слайд
Содержание слайда: 3 способ. Попробуем сократить перебор, для этого преобразуем второе условие
10a + b — (10c + d) = a + b + c + d;
9(a — c) = 2(c + d);
(a — c)/(c + d) = 2/9
Проанализировав первое условие, получаем,
что a = с + 2, d = 9 - c,
следовательно 0 <= c <= 7.
№9 слайд
Содержание слайда: Var a, b, c, d: integer;
Begin
for c:=0 to 7 do
begin
a := c + 2;
d := 9 - c;
for b := 0 to 9 do
if (b <> c) and (b <> a) and (b <> d)
then write (a, b, c, d);
end;
End.
№10 слайд
Содержание слайда: Задача 2.
Задача 2.
Если мы сложим все цифры какого-либо числа, затем все цифры найденной суммы и будем повторять много раз, мы, наконец, получим однозначное число (цифру), называемое цифровым корнем данного числа.
Например, цифровой корень числа 34697 равен 2
(3 + 4 + 6 + 9 + 7 = 29; 2 + 9 = 11; 1 + 1 = 2).
Составим программу для нахождения цифрового корня натурального числа.
№11 слайд
Содержание слайда:
№12 слайд
Содержание слайда: Var n, k, s: longint;
Var n, k, s: longint;
Begin
read (n);
s := n;
while s > 9 do
begin
k := s;
s := 0;
Repeat
s := s + k mod 10;
k := k div 10;
Until k = 0;
end;
writeln ('цифровой корень числа ', n, ‘ равен ', s);
End.
№13 слайд
Содержание слайда:
№14 слайд
Содержание слайда: 2. Задание
Что будет выведено на экране монитора после выполнения следующего фрагмента программы:
а := 28;
for i:=1 tо a div 2 do
if a mod i = 0 then writeln (i);
Решение какой задачи выражает этот фрагмент программы?
Скачать все slide презентации Вложенные циклы одним архивом:
