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

Цикл с параметром Вопросы для повторенияКакой оператор описывает в программе вывод результата?Write(), writeln()Какой оператор описывает в программе ввод Вопросы для повторенияКакая геометрическая фигура обозначает в блок-схеме действие?Прямоугольник Какая геометрическая фигура обозначает в блок-схеме Какое значение будет иметь переменная d после выполнения следующих операторов: 1. a:=3;b:=2;If a>b then d:=a ЦИКЛ С ПАРАМЕТРОМЦикл с параметром – повторное выполнение тела цикла, пока целочисленный параметр (i) пробегает ДВА ВАРИАНТА ЗАПИСИ:For i := In to Ik do For i := In downto Ik ВЫЧИСЛИТЬ     ввод nS:=0i:=1,nS:=S+sqr(i)конецвывод Sначало 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начало ВЫЧИСЛИТЬ    ввод nS:=0i:=1,nS:=S+sqrt(i)конецвывод Sначало 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:=n,1S:=sqrt(s+i)конецвывод Sначало Вычислить сумму 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начало ВЫЧИСЛИТЬначаловвод n,kS:=0i:=n*k,kS:=sqrt(s+i)конецвывод S ВЫЧИСЛИТЬначаловвод 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. Задачи для самостоятельного решенияВычислить Вычислить Вычислить
Вопросы для повторенияКакой оператор описывает в программе вывод результата?Write(), writeln()Какой оператор описывает в программе ввод данных?read(), readln()

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

Слайд 1

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

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



Слайд 2

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

Вопросы для повторения

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


Слайд 3

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

Вопросы для повторения

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


Слайд 4

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

Какое значение будет иметь переменная d после выполнения следующих операторов:

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 do For i := In downto Ik

ДВА ВАРИАНТА ЗАПИСИ:

For i := In to Ik do <тело цикла>
For i := In downto Ik do <тело цикла>


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



Слайд 7

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

ВЫЧИСЛИТЬ



ввод n

S:=0

i:=1,n

S:=S+sqr(i)

конец

вывод S

начало


Слайд 8

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начало

Program primer_1;
Var
i,n: integer; s: integer;
Begin
Write(‘Введите n=‘);
Readln(n);
S:=0;
For i:=1 to n do
S:=S+sqr(i);
Writeln(‘Summa=‘,s);
End.

ВЫЧИСЛИТЬ




ввод n

S:=0

i:=1,n

S:=S+sqr(i)

конец

вывод S

начало


Слайд 9

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

ВЫЧИСЛИТЬ




ввод n

S:=0

i:=1,n

S:=S+sqrt(i)

конец

вывод S

начало



Слайд 10

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начало

Program primer_2;
Var
i,n: integer; s: real;
Begin
Write(‘Введите n=‘);
Readln(n);
S:=0;
For i:=1 to n do
S:=S+sqrt(i);
Writeln(‘Summa=‘,s:6:4);
End.

ВЫЧИСЛИТЬ




ввод n

S:=0

i:=1,n

S:=S+sqrt(i)

конец

вывод S

начало



Слайд 11

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

Вычислить сумму




ввод n

S:=0

i:=n,1

S:=sqrt(s+i)

конец

вывод S

начало



Слайд 12

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

Вычислить сумму

Program primer_3;
Var
i,n: integer; s: real;
Begin
Write(‘Введите n=‘);
Readln(n);
S:=0;
For 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,kS:=0i:=n*k,kS:=sqrt(s+i)конецвывод S

ВЫЧИСЛИТЬ


начало

ввод n,k

S:=0

i:=n*k,k

S:=sqrt(s+i)

конец

вывод S



Слайд 14

ВЫЧИСЛИТЬначаловвод 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.

ВЫЧИСЛИТЬ


начало

ввод 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: ‘);
Read(n,k);
S:=0
For i:=n*k downto k do
S:=sqrt(s+i);
Writeln(‘Summa=‘,s:6:4);
End.


Слайд 15

Задачи для самостоятельного решенияВычислить Вычислить Вычислить

Задачи для самостоятельного решения


Вычислить

Вычислить

Вычислить














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