ПРОГРАММИРОВАНИЕ ЦИКЛИЧЕСКИХ АЛГОРИТМОВ АЛГОРИТМИЗАЦИЯ И ПРОГРАММИРОВАНИЕ Вопросы

ПРОГРАММИРОВАНИЕ ЦИКЛИЧЕСКИХ АЛГОРИТМОВ АЛГОРИТМИЗАЦИЯ И ПРОГРАММИРОВАНИЕ

Вопросы и задания № 67.

Вопросы и задания

Ключевые слова • while ( цикл-ПОКА) • repeat (цикл-ДО) • for (цикл с параметрами)

Программирование циклов с заданным числом повторений i = i 1, i 2 Тело цикла Общий вид оператора: for <параметр>: =<начальное_значение> to <конечное_значение> do <оператор> Здесь: <параметр> – переменная целого типа; <начальное_значение> и <конечное_значение> – выражения того же типа, что и параметр; <оператор> – простой или составной оператор – тело цикла.

Программирование циклов с заданным числом повторений i = i 1, i 2 Тело цикла Общий вид оператора: for <параметр>: =<начальное_значение> to <конечное_значение> do <оператор> После каждого выполнения тела цикла происходит увеличение на единицу параметра цикла; условие выхода из цикла – превышение параметром конечного значения.

Задание 1. Сколько раз будет выполнен цикл? а) for i: =0 to 15 do s: =s+1; б) for i: =10 to 15 do s: =s+1; в) for i: =-1 to 1 do s: =s+1; г) for i: =10 to 10 do s: =s+1; д) k: =5; for i: =k-1 to k+1 do s: =s+1;

Задание 2. Определите, что будет на пе ча та но в ре зуль та те работы сле ду ю щей программы. Текст про грам мы приведён на трёх язы ках программирования. Var s, k: integer; Begin s : = 1; for k : = 0 to 9 do s : = s + 5; write (s); End.

Задание 3. Определите, что будет на пе ча та но в ре зуль та те работы сле ду ю щей программы. Текст про грам мы приведён на трёх язы ках программирования. Var s, k: integer; Begin s : = 0; for k : = 13 to 16 do s : = s + 14; writeln(s); End.

Задание 4. Определите, что будет на пе ча та но в ре зуль та те работы сле ду ю щей программы. Текст про грам мы приведён на трёх язы ках программирования. Var y, i: integer; Begin y : = 5; For i : = 1 to 3 do y : = y + 5*i; Writeln(y); End.

Задание 5. Определите, что будет на пе ча та но в ре зуль та те работы сле ду ю щей программы. Текст про грам мы приведён на трёх язы ках программирования. Var s, n: integer; Begin s : = 2; For n : = 2 to 5 do s : = s*2 + n; Writeln(s); End.

Вопросы и задания program z 67; var a, d, k, S, i: integer; begin write('Количество деталей за первый час '); read(a); write('Увеличение на '); read(d); write('Количество часов '); read(k); S: =0; for i: =0 to k-1 do S: =S+(a+d*i); write('Количество деталей равно ', S); end.

Вопросы и задания 6. Напишите программу, которая выводит на экран таблицу умножения на n (n - целое число в диапазоне от 2 до 10, вводимое с клавиатуры). Пример входных данных Введите n>> 5 Пример выходных данных 5 5 5 5 5 * * * * * 2 = 10 3 = 15 4 = 20 5 = 25 6 = 30 7 = 35 8 = 40 9 = 45 10 = 50