Разделы презентаций


Презентация на тему Цикл с параметром

Вопросы для повторения Какой оператор описывает в программе вывод результата? Write(), writeln() Какой оператор описывает в программе ввод данных? read(), readln()
Цикл с параметром Вопросы для повторения Какой оператор описывает в программе вывод результата? Write(), writeln() Какой оператор описывает Вопросы для повторения Какая геометрическая фигура обозначает в блок-схеме действие? Прямоугольник  Какая геометрическая фигура Какое значение будет иметь переменная d после выполнения следующих операторов:  1. a:=3; b:=2; If ЦИКЛ С ПАРАМЕТРОМ Цикл с параметром – повторное выполнение тела цикла, пока целочисленный параметр (i) ДВА ВАРИАНТА ЗАПИСИ: For i := In to Ik do  For i := In ВЫЧИСЛИТЬ        ввод n S:=0 i:=1,n S:=S+sqr(i) конец вывод Program primer_1; Var i,n: integer; s: integer; Begin Write(‘Введите n=‘); Readln(n); S:=0; For i:=1 to ВЫЧИСЛИТЬ         ввод n S:=0 i:=1,n S:=S+sqrt(i) конец Program primer_2; Var i,n: integer; s: real; Begin Write(‘Введите n=‘); Readln(n); S:=0; For i:=1 to Вычислить сумму     ввод n S:=0 i:=n,1 S:=sqrt(s+i) конец вывод S начало Вычислить сумму  Program primer_3; Var i,n: integer; s: real; Begin Write(‘Введите n=‘); Readln(n); S:=0; ВЫЧИСЛИТЬ  начало ввод n,k S:=0 i:=n*k,k S:=sqrt(s+i) конец вывод S ВЫЧИСЛИТЬ  начало ввод n,k S:=0 i:=n*k,k S:=sqrt(s+i) конец вывод S Program primer_4; Var i,n,k: Задачи для самостоятельного решения  Вычислить   Вычислить    Вычислить
Слайды и текст этой презентации

Слайд 2 Вопросы для повторения
Какой оператор описывает в программе вывод

Вопросы для повторенияКакой оператор описывает в программе вывод результата?Write(), writeln()Какой оператор описывает в программе ввод

результата?
Write(), writeln()
Какой оператор описывает в программе ввод

данных?
read(), readln()


Слайд 3 Вопросы для повторения
Какая геометрическая фигура обозначает в блок-схеме

Вопросы для повторенияКакая геометрическая фигура обозначает в блок-схеме действие?Прямоугольник Какая геометрическая фигура обозначает в блок-схеме

действие?
Прямоугольник
Какая геометрическая фигура обозначает в блок-схеме ввод/вывод результата?
Параллелограмм
Какие

алгоритмические структуры вам знакомы?
Линейный алгоритм, ветвление и цикл


Слайд 4 Какое значение будет иметь переменная d после выполнения

Какое значение будет иметь переменная d после выполнения следующих операторов: 1. a:=3;b:=2;If a>b then d:=a

следующих операторов:
1. a:=3;
b:=2;
If a>b then d:=a else d:=b;
Ответ:

3
2. a:=-3;
b:=2;
If a>b then d:=a else d:=b;
Ответ: 2







Слайд 5 ЦИКЛ С ПАРАМЕТРОМ
Цикл с параметром – повторное выполнение

ЦИКЛ С ПАРАМЕТРОМЦикл с параметром – повторное выполнение тела цикла, пока целочисленный параметр (i) пробегает

тела цикла, пока целочисленный параметр (i) пробегает множество всех

значений от начального (In) до конечного (Ik):



Слайд 6 ДВА ВАРИАНТА ЗАПИСИ:
For i := In to Ik

ДВА ВАРИАНТА ЗАПИСИ:For i := In to Ik do For i := In downto Ik

do
For i := In downto Ik do




Цикл повторяется, пока значение параметра лежит в интервале между

In и Ik.
В первом варианте при каждом повторении цикла значение параметра изменяется на следующее значение в данном типе (для целого типа – увеличивается на 1).
Во втором варианте при каждом повторении цикла значение параметра изменяется на предыдущее значение в данном типе (для целого типа – уменьшается на 1).



Слайд 7 ВЫЧИСЛИТЬ


ввод n
S:=0
i:=1,n
S:=S+sqr(i)
конец
вывод S
начало

ВЫЧИСЛИТЬ   ввод nS:=0i:=1,nS:=S+sqr(i)конецвывод Sначало

Слайд 8 Program primer_1;
Var
i,n: integer; s: integer;
Begin
Write(‘Введите n=‘);
Readln(n);
S:=0;
For i:=1 to

Program primer_1;Vari,n: integer; s: integer;BeginWrite(‘Введите n=‘);Readln(n);S:=0;For i:=1 to n doS:=S+sqr(i);Writeln(‘Summa=‘,s);End.ВЫЧИСЛИТЬ ввод nS:=0i:=1,nS:=S+sqr(i)конецвывод Sначало

n do
S:=S+sqr(i);
Writeln(‘Summa=‘,s);
End.
ВЫЧИСЛИТЬ



ввод n
S:=0
i:=1,n
S:=S+sqr(i)
конец
вывод S
начало


Слайд 9 ВЫЧИСЛИТЬ




ввод n
S:=0
i:=1,n
S:=S+sqrt(i)
конец
вывод S
начало

ВЫЧИСЛИТЬ  ввод nS:=0i:=1,nS:=S+sqrt(i)конецвывод Sначало

Слайд 10 Program primer_2;
Var
i,n: integer; s: real;
Begin
Write(‘Введите n=‘);
Readln(n);
S:=0;
For i:=1 to

Program primer_2;Vari,n: integer; s: real;BeginWrite(‘Введите n=‘);Readln(n);S:=0;For i:=1 to n doS:=S+sqrt(i);Writeln(‘Summa=‘,s:6:4);End.ВЫЧИСЛИТЬ   ввод nS:=0i:=1,nS:=S+sqrt(i)конецвывод Sначало

n do
S:=S+sqrt(i);
Writeln(‘Summa=‘,s:6:4);
End.
ВЫЧИСЛИТЬ



ввод n
S:=0
i:=1,n
S:=S+sqrt(i)
конец
вывод S
начало


Слайд 11 Вычислить сумму



ввод n
S:=0
i:=n,1
S:=sqrt(s+i)
конец
вывод S
начало

Вычислить сумму ввод nS:=0i:=n,1S:=sqrt(s+i)конецвывод Sначало

Слайд 12 Вычислить сумму
Program primer_3;
Var
i,n: integer; s: real;
Begin
Write(‘Введите n=‘);
Readln(n);
S:=0;
For

Вычислить сумму Program primer_3;Vari,n: integer; s: real;BeginWrite(‘Введите n=‘);Readln(n);S:=0;For i:=n downto 1 doS:=sqrt(s+i);Writeln(‘Summa=‘,s:6:4);End.ввод nS:=0i:=n,1S:=sqrt(s+i)конецвывод Sначало

i:=n downto 1 do
S:=sqrt(s+i);
Writeln(‘Summa=‘,s:6:4);
End.



ввод n
S:=0
i:=n,1
S:=sqrt(s+i)
конец
вывод S
начало


Слайд 13 ВЫЧИСЛИТЬ

начало
ввод n,k
S:=0
i:=n*k,k
S:=sqrt(s+i)
конец
вывод S

ВЫЧИСЛИТЬначаловвод n,kS:=0i:=n*k,kS:=sqrt(s+i)конецвывод S

Слайд 14 ВЫЧИСЛИТЬ

начало
ввод n,k
S:=0
i:=n*k,k
S:=sqrt(s+i)
конец
вывод S
Program primer_4;
Var
i,n,k: integer; s: real;
Begin
Write(‘Введите n,k:

ВЫЧИСЛИТЬначаловвод n,kS:=0i:=n*k,kS:=sqrt(s+i)конецвывод SProgram primer_4;Vari,n,k: integer; s: real;BeginWrite(‘Введите n,k: ‘);Read(n,k);S:=0For i:=n*k downto k doS:=sqrt(s+i);Writeln(‘Summa=‘,s:6:4);End.

‘);
Read(n,k);
S:=0
For i:=n*k downto k do
S:=sqrt(s+i);
Writeln(‘Summa=‘,s:6:4);
End.


  • Имя файла: tsikl-s-parametrom.pptx
  • Количество просмотров: 210
  • Количество скачиваний: 0