Question

Найдите значение при выполнении программы S:=1; For z:=1 to 8 do a[z]:=sqr(z); for k:=1 to 8 do if a[k]>9 then a[k]:=2; for z:=4 to 8 do S:=S*A[k]; write(S); 2. Что вычисляет данный алгоритм? var z:integer;A:array[1..8] of integer; begin S:=0; For z:=1 to 8 do S:=sqr(z); end. Выберите один ответ: a. формирует массив А, каждый элемент которого равен квадрату z b. формирует массив А, каждый элемент которого равен квадрату своего индекса c. Находит квадрат последнего значения переменной цикла d. Находит корни квадратные из переменной цикла и сохраняет в массив e. Находит сумму квадратов индексов f. формирует массив А, каждый элемент которого равен 4 3. Назовите конструкцию: d:=15; a:=0; z:=2; while a begin a:=a+z; write(a) end; Выберите один ответ: a. Полное ветвление b. Выбор c. Неполное ветвление d. Составной оператор e. Цикл "Повтори N раз" f. Цикл "Пока" с предусловием g. Цикл "Пока" с постусловием h. Следование i. Неполное ветвление

Answer 1

1)S=1*2*2*2*2*2=32

2) с

3)f

Answer 2

1. Данный алгоритм вычисляет произведение элементов массива A, начиная с индекса 4 и заканчивая индексом 8, где элементы массива A равны квадратам соответствующих индексов. Ответ: f. формирует массив А, каждый элемент которого равен 4.

2. Данный алгоритм формирует массив A, каждый элемент которого равен квадрату своего индекса. Ответ: b. формирует массив А, каждый элемент которого равен квадрату своего индекса.

3. Данная конструкция - g. Цикл "Пока" с постусловием, так как она имеет вид "while a begin" и выполняет циклический повтор операций до тех пор, пока условие (a) не станет ложным.