Цикл с параметром Искандарова А.Р. учитель информатики МБОУ СОШ 18 г. Уфа

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

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

1) begin 2) begin x:=5;x:=3; y:=3;y:=2; a:=x+y;x:=sqr(x)+sqr(y); a:=a+2;writeln(x); writeln(a);end. end.Ответ:

1) begin 2) begin x:=5;x:=3; y:=3;y:=2; a:=x+y;x:=sqr(x)+sqr(y); a:=a+2;writeln(x); writeln(a);end. end. Ответ: 10Ответ: 13

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

ЦИКЛ С ПАРАМЕТРОМ Цикл с параметром – повторное выполнение тела цикла, пока целочисленный параметр (i) пробегает множество всех значений от начального (In) до конечного (Ik): I := In, Ik тело цикла

ДВА ВАРИАНТА ЗАПИСИ: 1. For i := In to Ik do 2. For i := In downto Ik do Цикл повторяется, пока значение параметра лежит в интервале между In и Ik. В первом варианте при каждом повторении цикла значение параметра изменяется на следующее значение в данном типе (для целого типа – увеличивается на 1). Во втором варианте при каждом повторении цикла значение параметра изменяется на предыдущее значение в данном типе (для целого типа – уменьшается на 1).

ВЫЧИСЛИТЬ ввод n S:=0 i:=1,n S:=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 начало

ВЫЧИСЛИТЬ ввод n S:=0 i:=1,n S:=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 начало

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

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

1. Вычислить 2. Вычислить 3. Вычислить

СПИСОК ЛИТЕРАТУРЫ: 1. Угринович Н.Д. Информатика и ИКТ: учебник для 9 класса. – М.: БИНОМ. Лаборатория знаний, Семакин И.Г., Хеннер Е.К. Информатика. Задачник- практикум: Том 1. – М.: БИНОМ. Лаборатория знаний, Иванова Г.А. Типы циклических задач на языке программирования Паскаль // Информатика и образование. 2010, 11.