Решение задач по информатике: массивы в Pascal

Ниже представлены решения задач из вашего варианта, оформленные для записи в тетрадь. Задача 1. Описание одномерного целочисленного массива. Правильный ответ: 1) var a: array [1..5] of integer; Пояснение: В языке Pascal для описания массива целых чисел используется тип integer. Задача 2. Фрагмент программы заполнения целочисленного массива A десятью случайными числами из интервала [0, 10]. Правильный ответ: 2) for i:=1 to 10 do a[i]:=random(11); Пояснение: Функция random(n) возвращает случайное число от 0 до \(n-1\). Чтобы получить числа до 10 включительно, нужно использовать random(11). Задача 3. Значения элементов массива A, состоящего из 10 элементов, равны соответственно: 5, 7, 6, 0, 3, 1, 8, 4, 0, 5. В результате выполнения фрагмента программы: c:=0; for i:=1 to 5 do if A[i-1] < A[i] then begin c:=c+1; t:=A[i]; A[i]:=A[i-1]; A[i-1]:=t end; переменная c примет значение: Решение: Проследим итерации цикла для \(i\) от 1 до 5: 1) \(i=1\): Сравниваются \(A[0]\) и \(A[1]\). В условии задачи массив начинается с индекса 0. \(A[0]=5, A[1]=7\). Так как \(5 < 7\), условие выполняется. \(c = 1\). Элементы меняются местами: массив становится [7, 5, 6, 0, 3...]. 2) \(i=2\): Сравниваются \(A[1]\) и \(A[2]\). Теперь \(A[1]=5, A[2]=6\). Так как \(5 < 6\), условие выполняется. \(c = 2\). Массив: [7, 6, 5, 0, 3...]. 3) \(i=3\): Сравниваются \(A[2]\) и \(A[3]\). \(A[2]=5, A[3]=0\). Условие \(5 < 0\) ложно. 4) \(i=4\): Сравниваются \(A[3]\) и \(A[4]\). \(A[3]=0, A[4]=3\). Так как \(0 < 3\), условие выполняется. \(c = 3\). Массив: [7, 6, 5, 3, 0...]. 5) \(i=5\): Сравниваются \(A[4]\) и \(A[5]\). \(A[4]=0, A[5]=1\). Так как \(0 < 1\), условие выполняется. \(c = 4\). Итоговое значение \(c = 4\). Правильный ответ: 1) 4 Задача 4. В результате выполнения фрагмента программы: const a: array [1..3] of integer = (1, 2, 3); const b: array [1..3] of integer = (3, 2, 0); s:=0; for i:=1 to 3 do begin c[i]:=a[i]+b[i]; s:=s+c[i]; end; будет вычислено значение s: Решение: Вычислим значения \(c[i]\) и сумму \(s\): 1) \(i=1\): \(c[1] = a[1] + b[1] = 1 + 3 = 4\); \(s = 0 + 4 = 4\). 2) \(i=2\): \(c[2] = a[2] + b[2] = 2 + 2 = 4\); \(s = 4 + 4 = 8\). 3) \(i=3\): \(c[3] = a[3] + b[3] = 3 + 0 = 3\); \(s = 8 + 3 = 11\). Правильный ответ: 2) 11 Задача 5. Оператор: for i:=1 to 20 do if a[i] <> 0 then writeln (a[i]); выводит на экран: Правильный ответ: 2) ненулевые элементы массива a Пояснение: Условие \(a[i] <> 0\) означает "элемент массива не равен нулю". Следовательно, программа выведет все элементы, которые не являются нулями.