Паскаль: 42 - Массивы 1. Отметьте все правильные объявления массива в языке Паскаль. var A[1..20] of integer; var A: array [1...20] of integer; var A: array [-8..10] of integer; var A: array [-8..10]; var A[1..10]; 2. Отме...

Паскаль: 42 - Массивы 1. Отметьте все правильные объявления массива в языке Паскаль. var A[1..20] of integer; var A: array [1...20] of integer; var A: array [-8..10] of integer; var A: array [-8..10]; var A[1..10]; 2. Отметьте все правильные утверждения о массивах в языке Паскаль. элементы массива могут быть разных типов все элементы массива должны быть одного типа элементы в памяти расположены рядом элементы могут быть расположены в памяти по одному элементы всегда нумеруются с единицы 3. Сколько байт в памяти занимает массив A, если на целое число отводится 4 байта? var A: array[-3..2] of integer; Ответ: 4. Требуется заполнить массив именно так: X = [1 3 5 7 9 11] Какой оператор надо поместить в тело цикла вместо многоточия? for k:=1 to 6 do begin ... end; X[k] := k X[k] := 2*k X[k] := 2*k - 1 X[k] := 2*k + 1 X[k] := 2*(k - 1) 5. Требуется заполнить массив именно так: X = [12 9 6 3 0 -3] Какой оператор надо поместить в тело цикла вместо многоточия? for k:=1 to 6 do begin ... end; X[k] := k X[k] := 14 - 2*k X[k] := 3*k - 15 X[k] := 3*(k - 1) + 6 X[k] := 15 - 3*k 6. Требуется заполнить массив именно так: X = [3 4 7 8 11 12] Какой оператор надо поместить в тело цикла вместо многоточия? for k:=1 to 6 do begin ... end; X[k] := 3*k - k mod 2 X[k] := 2*k + k mod 2 X[k] := 2*k - k mod 2 X[k] := 2*k + k div 2 X[k] := 2*(k - 1) 7. Требуется заполнить массив именно так: X = [1 2 4 8 16 32] Какой оператор надо поместить в тело цикла вместо многоточия? X[1] := 1; for k:=2 to 6 do begin ... end; X[k] := k X[k] := 2*k X[k] := X[k-1] + 1 X[k] := 2*X[k-1] X[k] := 2*(X[k-1] - 1) 8. Что надо написать вместо многоточия, чтобы вывести элементы массива X[1..N] в обратном порядке? В ответе не используйте пробелы. for k:=1 to N do writeln ( ... ); Ответ: 9. Какой оператор надо вставить вместо многоточия, чтобы вывести на экран все элементы массива A[1..N] с четными номерами? В ответе не используйте пробелы. k := 2; while k <= N do begin writeln ( A[k] ); ... end; Ответ: 10. Задан массив X[1..N]. Какой оператор надо поставить вместо многоточия, чтобы найти сумму всех элементов массива в переменной S? Вводите ответ без пробелов. S := 0; for k := 1 to N do begin ... end; Ответ: 11. Задан массив X[1..N]. Какое условие надо поставить вместо многоточия, чтобы найти сумму положительных элементов массива в переменной S? Вводите ответ без пробелов. S := 0; for k := 1 to N do begin if . . . then S := S + X[k]; end; Ответ: 12. Задан массив X[1..N]. Какое условие надо поставить вместо многоточия, чтобы найти количество четных элементов массива в переменной S? S := 0; for j:=1 to N do if ... then S := S + 1; S mod 2 = 1 S mod 2 = 0 X[j] mod 2 = 1 X[j] mod 2 = 0 X[j] div 2 = 0