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

Презентация на тему Презентация по теме Циклы, предмет презентации: Информатика. Этот материал в формате pptx (PowerPoint) содержит 20 слайдов, для просмотра воспользуйтесь проигрывателем. Презентацию на заданную тему можно скачать внизу страницы, поделившись ссылкой в социальных сетях! Презентации взяты из открытого доступа или загружены их авторами, администрация сайта не отвечает за достоверность информации в них, все права принадлежат авторам презентаций и могут быть удалены по их требованию.

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

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

Программирование

Цикл


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

Цикл с предусловием–
Цикл -пока

Цикл с постусловием–
Цикл - До

Цикл с параметром

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

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

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


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

Цикл с предусловием–
Цикл -пока

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.


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

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


Слайд 5
Вычислить сумму чисел от 5 до 100 с шагом 0,5.(s=5+5,5+6+6,5+7+…+100)Var s,a :real;Begin s:=0; a:=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.


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

Вычислить

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.


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

1. Начав тренировки, спортсмен в первый день пробежал 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. Вычислить
Дано действительное число Х. Вычислить:



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

Цикл с постусловием–Цикл - До

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 - до


Слайд 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;
Текст слайда:

Вычислить сумму чисел от 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.


Слайд 11
Var s,a,b,c :real;Begin s:=17.4;      a:=12.3;b:=x*x;     c:=97;
Текст слайда:

Var 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


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

1. Начав тренировки, спортсмен в первый день пробежал 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. Вычислить
Дано действительное число Х. Вычислить:



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

Цикл с параметром

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 выполнять


Слайд 14
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
Текст слайда:

P:=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


Слайд 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
Текст слайда:

Вычислить 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


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

В банк положили сумму денег 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.


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


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;


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

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

Напечатать таблицу умножения натуральных чисел от 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.


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

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

Распечатать длины сторон треугольников, которые являются прямоугольными, если длины сторон 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.


Слайд 20
У гусей и кроликов вместе 64 лапы. Сколько могло быть кроликов и гусей (указать все сочетания ,
Текст слайда:


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


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

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


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

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

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

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