close

Вход

Забыли?

вход по аккаунту

?

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

код для вставкиСкачать
Цикл с параметром
 Программирование на Pascal
2
Циклы. Введение
Цикл –
это многократное выполнение одинаковой последовательности действий.
•
цикл с известным числом шагов
•
цикл с неизвестным
числом шагов (цикл с условием)
В Паскале реализованы три оператора цикла. Формально эти операторы называют •
«цикл с параметром
» (
For
),
•
«цикл с предусловием»
» (
While
), •
«цикл с постусловием»
» (
Repeat
)
.
Цикл со счетчиком
3
4
Цикл с переменной
for
<
переменная
>
:=
<
начальное значение
>
to
<
конечное значение
> do
begin
{
тело цикла
}
end;
Увеличение переменной на 1:
for
<
переменная
>
:=
<
начальное значение
>
downto
<
конечное значение
> do
begin
{
тело цикла
}
end;
Уменьшение переменной на 1:
Надо знать:
1.
Тип переменной:
В качестве параметра цикла может быть переменная целого (Integer, Word, LongInt и т.д.) или литерного типа. Не допускается переменная вещественного типа.
Начальное и конечное значение –
выражение того же типа, что и параметр цикла.
5
Надо знать:
Ϯ. Шаг изменения переменной цикла всегда равен 1 (
to
)
или -
1 (
downto
)
ϯ. Составной оператор:
если в теле цикла только один оператор, слова begin
и end
можно не писать:
for i:=
1
to 8
do
writeln(
'
Привет
'
);
6
Надо знать:
4.
Количество итераций:
•
если конечное значение меньше начального, цикл (
to
) не выполняется ни разу
(
проверка условия в начале цикла, цикл с предусловием)
;
•
если начальное значение совпадает с конечным значением, то цикл выполняется один раз;
•
цикл For
выполняется столько раз, сколько различных значений есть между <
начзнач
> и <
конзнач
> включительно. Например, при записи вида: For I:=Ϭ to ϭϬ do Write;I, ; На экране будет напечатано 11 чисел от 0 до 10: 0 1 2 3 4 5 6 7 8 9 10 7
Надо знать:
5. Значение параметра цикла в теле цикла, т.е. внутри оператора, стоящего после DO
, не должно изменяться
.
6. Не забывайте, что счетчику присваивается начальное значение, т.е. K
:= начальное значение
8
Надо знать:
7. При изменении начального и конечного значения внутри цикла количество шагов не изменится:
n := 8;
for i:=
1
to n
do begin
writeln(
'
Привет
'
);
n := n + 1;
end;
нет зацикливания
9
For
i:= N1 to N2
do
тело цикла;
i
–
параметр
цикла, счетчик
N1
–
начальное значение
N2
–
конечное значение
Если в теле цикла –
не один оператор, то Begin …End;
For
i
:= N1
to N2
do
Begin
тело цикла; несколько команд;
End;
11
14
Пример
Вывести на экран 5
раз слово «Привет».
program qq;
begin
writeln
('
Привет
');
writeln
('
Привет
');
writeln
('
Привет
');
writeln
('
Привет
');
writeln
('
Привет
');
end.
for i
:=1 to 5 do
begin
write('
Привет
');
writeln('
, Вася!
'); end; 16
Циклы
program qq;
var i: integer;
begin
for i
:=1 to 5 do
writeln
('
Привет
');
end.
ͨДля всех i
от 1 до 5 делай …ͩ
for i
:=1 to 5 do
Если в цикле более одного оператора:
begin
end;
Program MULTI_1;
Var
A, Y : real;
I, N : integer;
Begin
Write (
Введите число А -
);
Readln (A);
Write (
Введите степень числа А -
);
Readln(N);
Y:=1;
Write (
Результат -
, Y);
end.
Пример
Вычислить значение функции y=a
n
, где а
-
действительное число с натуральным показателем.
For I:=1 to N do Y:=Y *A;
17
Решение задач
•
Подсчитать сумму 10 чисел, введенных с клавиатуры.
•
Блок
-
схема
•
Решение
19
Задача
•
Подсчитать произведение 10 чисел введенных с клавиатуры.
•
Блок
-
схема
•
Решение
22
Задача
•
Подсчитать сумму положительных чисел среди 10 чисел введенных с клавиатуры.
•
Блок
-
схема
•
Решение
25
Задача
•
Подсчитать количество положительных чисел среди 10 чисел введенных с клавиатуры.
•
Блок
-
схема
•
Решение
28
Задача
•
Подсчитать сумму 20 слагаемых 1+2+3…+20
•
Блок
-
схема
•
Решение
31
Задача
•
Подсчитать сумму 20 слагаемых 1
-
1/2+1/3…
-
1/20
•
Блок
-
схема
•
Решение
34
Домашнее задание:
1.Составьте программу вычисления квадратов чисел от 1 до 20.
37
2.Напечатать все двухзначные числа, сумма которых равна 12.
38
39
Автор
wikkai
wikkai18   документов Отправить письмо
Документ
Категория
Презентации
Просмотров
116
Размер файла
497 Кб
Теги
Цикл с параметром For
1/--страниц
Пожаловаться на содержимое документа