Знай и люби операторы цикла - презентация, доклад, проект скачать

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

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

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

Слайд 1

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

Слайд 2

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

Слайд 3

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

Организует многократное исполнение тела цикла Организует многократное исполнение тела цикла

Слайд 4

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

СЧЁТЧИК( или параметр) цикла – искусственно вводимый объект для организации работы цикла; настройка начального и конечного значения счётчика задаёт количество раз работы цикла; СЧЁТЧИК( или параметр) цикла – искусственно вводимый объект для организации работы цикла; настройка начального и конечного значения счётчика задаёт количество раз работы цикла; ТЕЛО ЦИКЛА – оператор(может быть составной) для многократного исполнения; ПРОХОД ПО ЦИКЛУ – однократное исполнение тела цикла; ЗАЦИКЛИВАНИЕ – бесконечное исполнение цикла (это очень плохо!);

Слайд 5

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

For :=  to  do  ; For :=  to  do  ;

Слайд 6

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

Счётчик – объект перечисляемого типа! Счётчик – объект перечисляемого типа! Шаг изменения счётчика задается атоматически +1(с to) или -1(с downto)! Пусть А-нач. Знач. Счётчика, В-кон. Знач. Счётчика; тогда количество проходов по телу цикла с to с downto А=В 0 0 А<В В-А+1 0 А>В 0 А-В+1 В теле цикла изменять значение счётчика нельзя! Работает правило begin……….end для тела цикла

Слайд 7

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

For i:=1 to 99 do write(i*i:6); For i:=1 to 99 do write(i*i:6); For j:=50 downto 1 do writeln(2*j); A:=2;b:=102; For k:=a to b do if (k mod 3)=0 then p:=p+1; For l:=‘a’ to ‘я’ do write(ord(l):5); For m:=1 to length(str) do writeln(copy(str),m,1); For n:=‘z’ to ‘a’ do str:=str+n; SUM:=0; For p:=10 to 101 do begin read(S);SUM:=SUM+S end; write(SUM); For r=32 to 255 do writeln(chr(r),’-’,r:4); Progress:=1; Q:=1.21; For t:=33 downto 1 do write(progress*Q); For s:=1 to 128 do If (s mod 10)=0 then write(‘*’) else write(‘ ‘);

Слайд 8

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

Program letter; Program letter; Var fr:string; buk:char; i,j,L:byte; Label Mm; Begin write(‘введи фразу’); readln(fr); write(‘введи букву’);readln(buk); L:=length(fr); j:=0; Mm: i:=pos(buk,fr); If i<>o then begin j:=j+i; write(j:4); fr:=copy(fr,i+1,L-i); goto Mm end; Write(‘end’); End.