Текст этой презентации
Слайд 1
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 1](/files/613/268/1.jpg)
Цикл с параметром
Слайд 2
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 2](/files/613/268/2.jpg)
Вопросы для повторения
Какой оператор описывает в программе вывод результата?
Write(<список вывода>), writeln(<список вывода>)
Какой оператор описывает в программе ввод данных?
read(<список ввода>), readln(<список ввода>)
Слайд 3
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 3](/files/613/268/3.jpg)
Вопросы для повторения
Какая геометрическая фигура обозначает в блок-схеме действие?
Прямоугольник Какая геометрическая фигура обозначает в блок-схеме ввод/вывод результата?
Параллелограмм
Какие алгоритмические структуры вам знакомы?
Линейный алгоритм, ветвление и цикл
Слайд 4
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 4](/files/613/268/4.jpg)
Какое значение будет иметь переменная 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
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 5](/files/613/268/5.jpg)
ЦИКЛ С ПАРАМЕТРОМ
Цикл с параметром – повторное выполнение тела цикла, пока целочисленный параметр (i) пробегает множество всех значений от начального (In) до конечного (Ik):
Слайд 6
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 6](/files/613/268/6.jpg)
ДВА ВАРИАНТА ЗАПИСИ:
For i := In to Ik do <тело цикла>
For i := In downto Ik do <тело цикла> Цикл повторяется, пока значение параметра лежит в интервале между In и Ik.
В первом варианте при каждом повторении цикла значение параметра изменяется на следующее значение в данном типе (для целого типа – увеличивается на 1).
Во втором варианте при каждом повторении цикла значение параметра изменяется на предыдущее значение в данном типе (для целого типа – уменьшается на 1).
Слайд 7
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 7](/files/613/268/7.jpg)
ВЫЧИСЛИТЬ
ввод n
S:=0
i:=1,n
S:=S+sqr(i)
конец
вывод S
начало
Слайд 8
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 8](/files/613/268/8.jpg)
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
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 9](/files/613/268/9.jpg)
ВЫЧИСЛИТЬ
ввод n
S:=0
i:=1,n
S:=S+sqrt(i)
конец
вывод S
начало
Слайд 10
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 10](/files/613/268/10.jpg)
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
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 11](/files/613/268/11.jpg)
Вычислить сумму
ввод n
S:=0
i:=n,1
S:=sqrt(s+i)
конец
вывод S
начало
Слайд 12
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 12](/files/613/268/12.jpg)
Вычислить сумму
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
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 13](/files/613/268/13.jpg)
ВЫЧИСЛИТЬ
начало
ввод n,k
S:=0
i:=n*k,k
S:=sqrt(s+i)
конец
вывод S
Слайд 14
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 14](/files/613/268/14.jpg)
ВЫЧИСЛИТЬ
начало
ввод 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
![Решение задач по теме «Цикл с параметром» на языке программирования Паскаль, слайд 15](/files/613/268/15.jpg)
Задачи для самостоятельного решения
Вычислить Вычислить Вычислить