- Главная
- Разное
- Дизайн
- Бизнес и предпринимательство
- Аналитика
- Образование
- Развлечения
- Красота и здоровье
- Финансы
- Государство
- Путешествия
- Спорт
- Недвижимость
- Армия
- Графика
- Культурология
- Еда и кулинария
- Лингвистика
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Детские презентации
- Информатика
- История
- Литература
- Маркетинг
- Математика
- Медицина
- Менеджмент
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, картинки для презентаций
- Экология
- Экономика
- Юриспруденция
Вложенные циклы. Задачи на карантин презентация
Содержание
- 1. Вложенные циклы. Задачи на карантин
- 2. Если телом цикла является цикл, то такие циклы называются вложенными или «Цикл в цикле»
- 3. Цикл, содержащий в себе другой цикл, называют
- 4. Вложенные циклы Цикл называется вложенным, если
- 5. For i:=1 to 3 do For j:=1
- 6. Вывод на экран таблицы умножения
- 7. var i, j: integer; begin
- 8. Сколько можно купить быков, коров и телят,
- 9. Var b, k, t:integer; Begin for b:=0
- 10. Задача. Найти все симметричные четырехзначные числа сумма
- 11. Найти все симметричные четырехзначные числа сумма цифр
Если телом цикла является цикл, то такие циклы называются вложенными или «Цикл в цикле»
Слайд 3Цикл, содержащий в себе другой цикл, называют внешним, а цикл, содержащийся
в теле другого цикла, называют внутренним.
Слайд 4Вложенные циклы
Цикл называется вложенным, если он находится в теле другого
цикла.
for i:=0 to n do
begin
for j:=0 to m do
begin
for k:=0 to w do
begin
end;
end;
end;
Внутренний цикл должен полностью находиться в теле внешнего цикла.
for i:=0 to n do
begin
for j:=0 to m do
begin
for k:=0 to w do
begin
end;
end;
end;
Внутренний цикл должен полностью находиться в теле внешнего цикла.
Цикл k
Цикл j
Цикл i
Слайд 5For i:=1 to 3 do
For j:=1 to 2 do
Writeln(i,j);
11
12
21
22
31
32
For i:=1 to
2 do
For j:=1 to 3 do
Writeln(i,j);
11
12
13
21
22
23
For j:=1 to 3 do
Writeln(i,j);
11
12
13
21
22
23
Слайд 7var i, j: integer;
begin
for i:=1 to 10
do
begin
for j:=1 to 10 do
write (i * j :5);
writeln;
end;
end. программа
begin
for j:=1 to 10 do
write (i * j :5);
writeln;
end;
end. программа
i
j
Слайд 8Сколько можно купить быков, коров и телят, если бык стоит 10
рублей, корова - 5 рублей, теленок – 0,5 рубля и на 100 рублей надо купить 100 животных.
Решение:
B – количество быков
K - количество коров
T- количество телят.
10b+5k+0,5t=100
b+k+t=100
Преобразуем их:
20b+10k+t=200,
b+k+t=100
На 100 рублей можно купить:
Не больше 10 быков, 0≤b≤10
Не больше 20 коров, 0≤k≤20
Не больше 200 телят, 0≤t≤200
Задача про покупку коров
Слайд 9Var b, k, t:integer;
Begin
for b:=0 to 10 do
for k:=0
to 20 do
for t:=0 to 200 do
if (20*b+10*k+t=200) and (b+k+t=100)
then
writeln(‘Быков ',b,' Коров ',k,' Телят ', t);
end.
for t:=0 to 200 do
if (20*b+10*k+t=200) and (b+k+t=100)
then
writeln(‘Быков ',b,' Коров ',k,' Телят ', t);
end.
Слайд 10Задача.
Найти все симметричные четырехзначные числа сумма цифр которых равна заданному числу
х.
Обозначим, a- первая цифра
b- вторая цифра
c- третья цифра
d – четвертая цифра
Какое число является симметричным?
a=d и b=c
(например, 2552, 1111)
Обозначим, a- первая цифра
b- вторая цифра
c- третья цифра
d – четвертая цифра
Какое число является симметричным?
a=d и b=c
(например, 2552, 1111)
Слайд 11Найти все симметричные четырехзначные числа сумма цифр которых равна заданному числу
х.
var x,a,b,c,d,s : integer;
begin
readln (x);
for a:=1 to 9 do
for b:=0 to 9 do
for c:=0 to 9 do
for d:=0 to 9 do
begin
S:=a + b + c + d;
If (a=d) and (b=c) and (S=x) then write (a, b, c, d);
end;
end.
var x,a,b,c,d,s : integer;
begin
readln (x);
for a:=1 to 9 do
for b:=0 to 9 do
for c:=0 to 9 do
for d:=0 to 9 do
begin
S:=a + b + c + d;
If (a=d) and (b=c) and (S=x) then write (a, b, c, d);
end;
end.
