Презентация Программирование циклов. Урок 34 онлайн
На нашем сайте вы можете скачать и просмотреть онлайн доклад-презентацию на тему Программирование циклов. Урок 34 абсолютно бесплатно. Урок-презентация на эту тему содержит всего 28 слайдов. Все материалы созданы в программе PowerPoint и имеют формат ppt или же pptx. Материалы и темы для презентаций взяты из открытых источников и загружены их авторами, за качество и достоверность информации в них администрация сайта не отвечает, все права принадлежат их создателям. Если вы нашли то, что искали, отблагодарите авторов - поделитесь ссылкой в социальных сетях, а наш сайт добавьте в закладки.
Оцените презентацию от 1 до 5 баллов!
- Тип файла:ppt / pptx (powerpoint)
- Всего слайдов:28 слайдов
- Для класса:1,2,3,4,5,6,7,8,9,10,11
- Размер файла:103.82 kB
- Просмотров:85
- Скачиваний:0
- Автор:неизвестен
Слайды и текст к этой презентации:
№1 слайд
Содержание слайда: ПРОГРАММИРОВАНИЕ ЦИКЛОВ
УРОК 34
№2 слайд
Содержание слайда: Цель:
освоить программирование циклов с постусловием
№3 слайд
Содержание слайда: Проверочная работа «Цикл с предусловием»
№4 слайд
Содержание слайда: 1. Запишите конструкцию цикла с предусловием.
В каких случаях применяется цикл с предусловием?
№5 слайд
Содержание слайда: 2. Запишите правильную структуру последовательности операторов.
а:=2; b:=l; while a+b<8 do begin a:=a+l; b:=b+l end; s:=a+b.
Сколько раз будет повторен цикл и какими будут значения переменных a, b, s после его завершения?
№6 слайд
Содержание слайда: 3. Запишите правильную структуру последовательности операторов. Какими будут значения переменных а и b после выполнения операторов?
а:=1; b:=l; while а<=8 do а:=а+1; b:=b+l.
№7 слайд
Содержание слайда: 4. Дана последовательность операторов, вычисляющих факториал f числа я, которая содержит пять ошибок. Найдите эти ошибки, предварительно записав операторы в правильном виде.
k:=l;f:=0;
while k<n do f=f*k
k:=k+l,
Примечание. Факториалом натурального числа называется произведение всех натуральных чисел от 1 до этого числа, т. е. n!=1*2*3*...*(n—2)*(n—1)*n.
№8 слайд
Содержание слайда: 5. Найдите и исправьте ошибки в следующем фрагменте программы, определяющей для заданного натурального числа n число, записанное цифрами числа n в обратном порядке.
р:=n;
while р>=0 do begin
а:=а+р mod 10;
р:=р div 10
end;
№9 слайд
Содержание слайда: Ответы:
while <логическое выражение> do begin группа операторов end;
Когда до выполнения цикла количество повторов неизвестно.
№10 слайд
Содержание слайда: 2.
а:=2;
b:=1;
while a+b<8 do
begin
a:=a+l;
b:=b+l
end;
s:=a+b.
2 раза;
a = 5, b = 3, s = 8.
№11 слайд
Содержание слайда: 3. a:=2; b:=3;
while a<=7 do
а:=а+1;
b:=b+l;
а = 8, b = 4.
4. k:=1; f:=l;
while k<=n do f=f*k;
k:=k+l;
end;
№12 слайд
Содержание слайда: 5. read(n);
p:=n; a:=0;
while p>=0 do
begin
a:=a*10+p mod 10;
p:=p div 10
end;
№13 слайд
Содержание слайда: Вы уже умеете организовать цикл при помощи оператора while.
Напомним, что при выполнении этого оператора компьютер вычисляет значение условия.
№14 слайд
Содержание слайда: Если условие истинно, то исполнительная часть оператора while будет выполняться до тех пор, пока это условие не примет значение false.
Если значение условия есть false в самом начале, то исполнительная часть оператора while вообще не будет выполняться.
№15 слайд
Содержание слайда: Иногда при решении задач возникает необходимость выполнить тело цикла хотя бы один раз, а потом исследовать условие, повторять ли его еще раз. Эту задачу выполнит другой вид цикла Repeat.
№16 слайд
Содержание слайда: repeat повторяй операторы
until <условие>; до тех пор, пока условие не будет верным
Есть небольшое отличие в организации цикла repeat по сравнению с while: для выполнения в цикле repeat нескольких операторов не следует помещать эти операторы в операторные скобки begin... end. Зарезервированные слова repeat и until действуют как операторные скобки.
№17 слайд
Содержание слайда: Конструкция repeat... until работает аналогично циклу while. Различие заключается в том, что цикл while проверяет условие до выполнения действий, в то время как repeat проверяет условие после выполнения действий, это гарантирует хотя бы одно выполнение действий до завершения цикла.
№18 слайд
Содержание слайда: Например:
repeat
read (Number);
Sum:=Sum+Number;
until Number=- 1
repeat
i:= i+1;
writeln (Sqr(i))
until Number=-1
№19 слайд
Содержание слайда: Практическая работа
№20 слайд
Содержание слайда: Задание 1.
Определите, является ли данное число простым. Примечание. Простым называется число, которое не имеет делителей, кроме 1 и самого себя.
№21 слайд
Содержание слайда: Решение:
Var i, Number : integer; {возможный делитель и исследуемое число}
Begin
writeln ('Какое число должно быть проверено?');
read (Number);
i:=l;
repeat
i:=i+l;
until Number mod i=0;
if Number=i then writeln(Number,'является простым')
else writeln(Number,'делится на',i);
End.
№22 слайд
Содержание слайда: Задание 2. Выведите на экран строку из звездочек
Решение:
Var i, n: integer;
begin
write('Количество знаков:'); readln(n);
i:=l;
repeat
write(' (*)');
i:=i+l
until i>n;
end.
№23 слайд
Содержание слайда: Задание 3. Выведите квадраты натуральных чисел, не превосходящих 50.
Решение:
var х, n: integer;
begin
write('Enter n:'); readln(n);
x:=l;
repeat
у:=х*х;
if y<n then write(y,' ');
x:=x+1;
until y>n;
end.
№24 слайд
Содержание слайда: Задание 4. Найдите НОД двух чисел
Решение:
Var х, у: integer;
Begin
Writeln ('Введите два числа'); readln(x, у);
Repeat
If х>у then х:=х mod у else у:=у mod х;
Until (х=0) Or (у=0);
Writeln ('НОД=',х+у));
End.
№25 слайд
Содержание слайда: Вывод
Как программируется цикл с постусловием на языке Паскаль?
Для каких целей лучше его использовать?
№26 слайд
Содержание слайда: Домашнее задание
Составить программу нахождения НОД трех чисел. НОД(а,b,с)=НОД(НОД(а,b,с).
Составить программу нахождения НОК двух чисел, используя формулу А х B = НОД (A, В) х НОД (A, В).
№27 слайд
Содержание слайда: program dz1;
program dz1;
Var А, В, С, nod: integer;
Begin
Readln(A,B,C);
Repeat
If A>B then A:=A mod B else B:=B mod A;
Until (A=0) or (B=0);
Writeln('HOД=’ ,A+B);
nod:=A+B;
Repeat
If nod>C then nod:=nod mod С else C:=C mod nod;
Until (nod=0) or (C=0);
Writeln ('НОД=’,nod+C);
End.
№28 слайд
Содержание слайда: program dz2;
program dz2;
var n, m, i, nok: integer;
Begin
write('введите два числа');
readln(n, m);
if(m<>0) and (n<>0) then
begin
nok:=n*m; i:=nok;
while i>0 do begin
if (i mod n=0) and (i mod m=0) then nok:=i;
i:=i-1; end;
writeln('NOK',m,'i',n,'raven',nok)
end else writeln ('Na nol delit nelzya');
end.
Скачать все slide презентации Программирование циклов. Урок 34 одним архивом:
