Программирование циклов. Урок 34 - презентация, доклад, проект скачать

Нажмите для полного просмотра!

Программирование циклов. Урок 34, слайд №1

Программирование циклов. Урок 34, слайд №2

Программирование циклов. Урок 34, слайд №3

Программирование циклов. Урок 34, слайд №4

Программирование циклов. Урок 34, слайд №5

Программирование циклов. Урок 34, слайд №6

Программирование циклов. Урок 34, слайд №7

Программирование циклов. Урок 34, слайд №8

Программирование циклов. Урок 34, слайд №9

Программирование циклов. Урок 34, слайд №10

Программирование циклов. Урок 34, слайд №11

Программирование циклов. Урок 34, слайд №12

Программирование циклов. Урок 34, слайд №13

Программирование циклов. Урок 34, слайд №14

Программирование циклов. Урок 34, слайд №15

Программирование циклов. Урок 34, слайд №16

Программирование циклов. Урок 34, слайд №17

Программирование циклов. Урок 34, слайд №18

Программирование циклов. Урок 34, слайд №19

Программирование циклов. Урок 34, слайд №20

Программирование циклов. Урок 34, слайд №21

Программирование циклов. Урок 34, слайд №22

Программирование циклов. Урок 34, слайд №23

Программирование циклов. Урок 34, слайд №24

Программирование циклов. Урок 34, слайд №25

Программирование циклов. Урок 34, слайд №26

Программирование циклов. Урок 34, слайд №27

Программирование циклов. Урок 34, слайд №28

Содержание ▲

Вы можете ознакомиться и скачать презентацию на тему Программирование циклов. Урок 34. Доклад-сообщение содержит 28 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации

Слайд 1

Описание слайда:

ПРОГРАММИРОВАНИЕ ЦИКЛОВ УРОК 34

Слайд 2

Описание слайда:

Цель: освоить программирование циклов с постусловием

Слайд 3

Описание слайда:

Проверочная работа «Цикл с предусловием»

Слайд 4

Описание слайда:

1. Запишите конструкцию цикла с предусловием. В каких случаях применяется цикл с предусловием?

Слайд 5

Описание слайда:

2. Запишите правильную структуру последовательности операторов. а:=2; b:=l; while a+b

Слайд 6

Описание слайда:

3. Запишите правильную структуру последовательности операторов. Какими будут значения переменных а и b после выполнения операторов? а:=1; b:=l; while а

Слайд 7

Описание слайда:

4. Дана последовательность операторов, вычисляющих факториал f числа я, которая содержит пять ошибок. Найдите эти ошибки, предварительно записав операторы в правильном виде. k:=l;f:=0; while k

Слайд 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

Слайд 11

Описание слайда:

3. a:=2; b:=3; while a

Слайд 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 yn; 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(m0) and (n0) 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.