Презентация, доклад по теме Циклы

Содержание

Цикл с предусловием– Цикл -покаЦикл с постусловием–Цикл - ДоЦикл с параметромЦикл- многократное повторение последовательности действий.Протабулировать функцию у=х*х на [a;b] с шагом h.Вложенные циклы

Слайд 1Программирование
Цикл

ПрограммированиеЦикл

Слайд 2Цикл с предусловием–
Цикл -пока
Цикл с постусловием–
Цикл - До
Цикл с параметром
Цикл-

многократное повторение последовательности действий.

Протабулировать функцию у=х*х на [a;b] с шагом h.

Вложенные циклы

Цикл с предусловием– Цикл -покаЦикл с постусловием–Цикл - ДоЦикл с параметромЦикл- многократное повторение последовательности действий.Протабулировать функцию у=х*х

Слайд 3Цикл с предусловием–
Цикл -пока
Var a,b,h,x,y : real;
Begin read(a,b,h);

x:=a;
While x<=b do
begin y:=x*x;
writeln(x,’ ‘,y);
x:=x+h;
end;
End.

Ввод а,b,h

начало

Присваиваем начальное значение переменной

Проверка условия выполнения цикла

Тело цикла:
Вычисления,
Вывод результатов,
Изменение значений переменных

Протабулировать функцию у=х*х на [a;b] с шагом h.

Цикл с предусловием– Цикл -покаVar a,b,h,x,y : real;Begin read(a,b,h);      x:=a;

Слайд 4В цикле- пока
Переменным присваиваются начальные значения,
Проверяются условия при выполнении которых

будет выполняться цикл,
Выполняются команды, которые находятся в теле цикла
Обязательно необходимо изменить значения переменных, которые проверяются в условии выполнения цикла, иначе произойдет зацикливание -(цикл будет работать всегда , т.к. условие выполнения цикла будет всегда верным).
Происходит возврат на проверку условия.
Цикл- пока может ни разу не выполнится, если условие выполнения цикла не верно с самого начала.
Внутри тела цикла условие выполнения цикла не проверяется, поэтому необходимо заранее продумать как изменять значения переменных.

В цикле- пока Переменным присваиваются начальные значения,Проверяются условия при выполнении которых будет выполняться цикл,Выполняются команды, которые находятся

Слайд 5Вычислить сумму чисел от 5 до 100 с шагом 0,5.
(s=5+5,5+6+6,5+7+…+100)
Var s,a

:real;
Begin s:=0; a:=5;
while a<=100 do
begin s:=s+a;
a:=a+0.5;
end;
writeln(s);
End.
Вычислить сумму чисел от 5 до 100 с шагом 0,5.(s=5+5,5+6+6,5+7+…+100)Var s,a :real;Begin s:=0; a:=5;

Слайд 6Вычислить
Var s,a,b,c :real;
Begin s:=17.4;
a:=12.3;b:=x*x;

c:=97;
while b>=62 do
begin s:=s+a*b/c;
a:=a+0.5;
b=b*x;
c=c-7;
end;
writeln(s);
End.
Вычислить Var s,a,b,c :real;Begin s:=17.4;      a:=12.3;b:=x*x;     c:=97;

Слайд 71. Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый

день он увеличивал дневную норму на 10% от нормы предыдущего дня. Какой суммарный путь пробежит спортсмен за 7 дней?
2. Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить сколько амеб будет через 3,6,9,…,24 часа.
3. Вычислить s=Cosx+Cosx2+Cosx3+…+Cosxn
4. Дано натуральное число n , вычислить p=(3-1/2)(3-1/4)(3-1/6)*…*(3-1/2n)
5. Вычислить

Даны натуральные числа n, k. Вычислить
Дано действительное число Х. Вычислить:


1. Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на

Слайд 8Цикл с постусловием–Цикл - До
Var a,b,h,x,y : real;
Begin read(a,b,h);

x:=a;
repeat y:=x*x;
writeln(x,’ ‘,y);
x:=x+h;
until x>b;
End.

Протабулировать функцию у=х*х на [a;b] с шагом h.

Repeat -повторять
Until - до

Цикл с постусловием–Цикл - ДоVar a,b,h,x,y : real;Begin read(a,b,h);      x:=a;

Слайд 9В Цикле До условие выполнения цикла проверяется после выполнения тела цикла,

поэтому хотя бы один раз выполнится всегда.
При каких значениях цикл выполнится 1 раз?

Может произойти зацикливание , если условие выполнения цикла не выполнится никогда, поэтому внутри тела цикла обязательно должна быть команда которая изменяет значения переменных.
При каком значении h произойдет зацикливание?
В Цикле До условие выполнения цикла проверяется после выполнения тела цикла, поэтому хотя бы один раз выполнится

Слайд 10Вычислить сумму чисел от 5 до 100 с шагом 0,5.
(s=5+5,5+6+6,5+7+…+100)
Var s,

a :real;
Begin s:=0; a:=5;
repeat
s:=s+a;
a:=a+0.5;
until a>100;
writeln(s);
End.
Вычислить сумму чисел от 5 до 100 с шагом 0,5.(s=5+5,5+6+6,5+7+…+100)Var s, a :real;Begin s:=0; a:=5;

Слайд 11Var s,a,b,c :real;
Begin s:=17.4;
a:=12.3;b:=x*x;

c:=97;
repeat
s:=s+a*b/c;
a:=a+0.5;
b=b*x;
c=c-7;
until b<62;
writeln(s);
End.

Вычислить

Н

S=17,4;
a=12,3; b=x^2;
c=97

s=s+a*b/c

a=a+0,5; b=b*x;
c=c-7

К

Да

Нет

b<62

s

Var s,a,b,c :real;Begin s:=17.4;      a:=12.3;b:=x*x;     c:=97;

Слайд 121. Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый

день он увеличивал дневную норму на 10% от нормы предыдущего дня. Какой суммарный путь пробежит спортсмен за 7 дней?
2. Одноклеточная амеба каждые 3 часа делится на 2 клетки. Определить сколько амеб будет через 3,6,9,…,24 часа.
3. Вычислить s=Cosx+Cosx2+Cosx3+…+Cosxn
4. Дано натуральное число n , вычислить p=(3-1/2)(3-1/4)(3-1/6)*…*(3-1/2n)
5. Вычислить

Даны натуральные числа n, k. Вычислить
Дано действительное число Х. Вычислить:


1. Начав тренировки, спортсмен в первый день пробежал 10 км. Каждый день он увеличивал дневную норму на

Слайд 13Цикл с параметром
Var a,b,h,x,y : real;
Begin read(a,b);

for x:=a to b do
begin y:=x*x;
writeln(x,’ ‘,y);
end;
End.

В цикле с параметром параметр может изменять свое значение только на +1 или -1 (H=1 или H=-1)

for x:=a to b do значение х увеличивается на 1 от а до b включительно (a<=b)
for x:=a downto b do значение х изменяется на -1 (уменьшается) от а до b (a>=b) включительно
X- параметр цикла – простая переменная порядкового типа
А- выражение со значением порядкового типа- начальное значение параметра
B- выражение со значением порядкового типа- конечное значение параметра

For x:=a to b do
Для х от а до b выполнять

Цикл с параметромVar a,b,h,x,y : real;Begin read(a,b);      for x:=a to b do

Слайд 14P:=5;
For i:=3 to 18 do p:=p+2;
P:=3;
For i:=9 to 5 do p:=p+2;
Чему

будет равняться значение p

P:=3;
For i:=9 downto 5 do p:=p+2;

Как Вы думаете, сколько раз выполнятся эти циклы?
For i:=4 to 4 do

For i:=8 to 5 do

For a:=15 downto 6 do

For y:=9 downto 9 do

For k:=3 downto 7 do

P:=5;For i:=3 to 18 do p:=p+2;P:=3;For i:=9 to 5 do p:=p+2;Чему будет равняться значение pP:=3;For i:=9 downto

Слайд 15Вычислить p=17! (p=1*2*3*4*5*6*7*8*9*10*11*12*13*14*15*16*17)
Var p:real; x: integer;
Begin p:=1;

for x:=1 to 17 do
begin p:=p*x;
end;
writeln(p:0:0);
End.

Вычислить p=1*3*5*7*9*11*13*15*17

Вычислить p=17! (p=1*2*3*4*5*6*7*8*9*10*11*12*13*14*15*16*17)Var p:real; x: integer;Begin p:=1;      for x:=1 to 17 do

Слайд 16В банк положили сумму денег S. Сколько денег будет на счету

через 18 месяцев, если ежемесячный прирост 0,5%.

Var s:real; x: integer;
Begin read(s);
for x:=1 to 18 do
begin p:=s/100*0.5;
s:=s+p;
end;
writeln(s:0:2);
End.

В банк положили сумму денег S. Сколько денег будет на счету через 18 месяцев, если ежемесячный прирост

Слайд 17
1. Распечатать: а) целые числа от -7 до 23; б)

буквы от «А» до «Я»
2. Найти сумму ряда с точностью 0.001, общий член которого задан формулой:
a) an=2n-1 / 2n b) an=10n / n! с) an=2n*n! / nn d) an=1/ (3n-2)(3n+1)
3. Найти наименьший номер последовательности, для которого выполняется условие |an-an-1|an=arctg an-1 +1, где a1=0; b) an=2+1/ an-1, где a1=2;
c) an=1/2 Cos an-1 , где a1=0,5; d) , где a1=x;

1. Распечатать: а) целые числа от -7 до 23;  б) буквы от «А» до «Я»2. Найти

Слайд 18Вложенные циклы
Напечатать таблицу умножения натуральных чисел от 1 до 9 (от

5 до 99.

Var a,b:integer;
Begin
For a:=1 to 9 do

For b:=1 to 9 do

write(a,’*’,b,’=‘,a*b,’ ‘)
End.

Вложенные циклыНапечатать таблицу умножения натуральных чисел от 1 до 9 (от 5 до 99.Var a,b:integer;Begin For a:=1

Слайд 19Вложенные циклы
Распечатать длины сторон треугольников, которые являются прямоугольными, если длины сторон

a,b,c∈[2;17]

Var a,b,c: integer;
Begin
For a:=2 to 17 do

For b:=2 to 17 do

For c:=2 to 17 do

If a*a+b*b=c*c
then writeln(a,’ ‘,b,’ ‘,c);
End.

Вложенные циклыРаспечатать длины сторон треугольников, которые являются прямоугольными, если длины сторон a,b,c∈[2;17] Var a,b,c: integer;Begin  For

Слайд 20
У гусей и кроликов вместе 64 лапы. Сколько могло быть кроликов

и гусей (указать все сочетания , которые возможны).
Имеется 100руб. Необходимо купить 100 голов скота. Сколько можно купить быков, коров и телят, если бык стоит 10 руб., корова 5 руб., а теленок 0,5 руб.
У гусей и кроликов вместе 64 лапы. Сколько могло быть кроликов и гусей (указать все сочетания ,

Что такое shareslide.ru?

Это сайт презентаций, где можно хранить и обмениваться своими презентациями, докладами, проектами, шаблонами в формате PowerPoint с другими пользователями. Мы помогаем школьникам, студентам, учителям, преподавателям хранить и обмениваться учебными материалами.


Для правообладателей

Яндекс.Метрика

Обратная связь

Email: Нажмите что бы посмотреть