1. Выберите правильные варианты вывода элементов массива на печать в строку.
1)for i:=1 to n do write (a[i], ` ` )
2)for i:=1 to n do writeln (a[i])
3)for i:=1 to n do write (`a[`, i, `]=`)
4)for i:=1 to n do write (`a`, i, `=`, a[i])
2. Каким способом можно заполнить массив?
1)С помощью оператора присваивания по формуле
2)Все варианты ответов верны
3)С помощью оператора присваивания случайными числами
4)Вводом каждого элемента с клавиатуры
3. var a: array [1..59] of real;Здесь oписан массив a из … вещественных чисел.
1)58
2)60
3)59
4)50
4. Упорядоченное множество однотипных данных, имеющих общее имя и различающихся номерами, называют…
1)структурированием
2)множеством
3)последовательностью
4)массивом
5. Какой оператор необходимо вставить вместо многоточия в следующий фрагмент программы на языке Паскаль, чтобы верно решалась задача нахождения произведения элементов массива А, содержащего N элементов?
…
for i:=1 to N do S:=S*A[i]

1)S:=A[1]
2)S:=0
3)S:=A[N]
4)S:=1
6. Задан одномерный массив А, содержащий N элементов. Укажите, что будет определено в результате работы следующего фрагмента программы:
S:=0;
for i:=1 to N do
if A[i]>0 then S:=S+A[i];
1)Максимальный элемент массива
2)Сумма неотрицательных элементов массива
3)Количество положительных элементов массива
4)Сумма положительных элементов массива
7. Выберите правильное описание массива А, состоящего из нескольких переменных целого типа ...
1)A : array [1..25] of byte
2)A : [1..25] of integer
3)A : array [1..25] of integer
4)A : array [1..25] of real
8. Задан одномерный массив А, содержащий N элементов. Значения всех элементов массива различны. Укажите, что будет определено в результате работы следующего фрагмента программы:
m:=1;
for i:=1 to N do
if A[i]>=A[m] then m:=i

1)Индекс максимального элемента массива
2)Значение максимального элемента массива
3)Индекс минимального элемента массива
4)Значение минимального элемента массива
9.Дан фрагмент программы, определяющий количество отрицательных элементов массива A[1..10]. Восстановите пропущенное условие.
k:=0;
for i:=1 to 10 do
if ________ then k:=10 – 1;
write (p)

1)A[i]>0
2)A[i]<=0
3)A[i]<0
4)A[i]>0