Значение счетчика цикла может использоваться в выражениях, входящих в операторы тела цикла, но изменение значения счетчика цикла этими операторами недопустимо.

В Паскале имеются два способа для организации регулярного цикла: прямой и обратный.

Прямой пересчет идет от известного меньшего числа до известного большего, на каждом шаге прибавляется единица (например, от 20 до 25: 20, 21, 22, 23, 24, 25).

Обратный пересчет – от большего к меньшему. И на каждом шаге вычитается единица.

Определите, что будет напечатано в результате работы следующей программы:

1. Var s,k: integer;
Begin
s := 0;
for k := 0 to 11 do
s := s+7;
writeln(s);
End.

2. Var s,k: integer;
Begin
s := 0;
for k := -5 to 5 do
s := s + 15;
writeln(s);
End.

3. Вывести на экран значение y2 (y=1,2,…,10) в возрастающем и убывающем порядке

4. Выбрать наименьшие значение из 20 чисел, вводимых с клавиатуры:

5. Вычислить сумму n чисел, вводимых с клавиатуры.

6. Среди всех двузначных чисел найти те, сумма цифр которых равна n (0<n≤18) и количество этих чисел.

Задания для самостоятельного выполнения

1. Написать программу, которая вычисляет среднее арифметическое вводимой с клавиатуры последовательности дробных чисел. Количество чисел должно задаваться во время работы программы.

2. Написать программу, которая находит сумму целых положительных чисел, которые больше 20, меньше 100, кратны 3 и заканчиваются на 2, 4 или 8.

⇐ Предыдущая 12