Задание 10 Вариант 1 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

По результатам работы программы заполните таблицу, закрасив (маркером) ячейки с найденными элементами:
А[1] = А[4] = А[7] = А[10] =
А[2] = А[5] = А[8] = А[11] =
А[3] = А[6] = А[9] = А[12] =
program s4_v1_10;
var
a: array[1..12] of integer;
i: integer;
begin
writeln(‘ввод массива’);
randomize;
for i := 1 to 12 do
begin
a[i] := random(10) + 1;
write(a[i], ‘, ‘)
end;
writeln;
for i := 1 to 12 do
if a[i] = i then writeln(‘a[‘, i, ‘]=’, a[i])
end.

Нужно перебрать все элементы массива из 12 чисел, вывести весь массив в строку, а затем отдельно напечатать те элементы, у которых значение совпадает с индексом.

Так как элементы массива случайные и лежат в промежутке $$[1;11)$$, то каждый элемент принимает значения от 1 до 10.

program s4_v1_10;
var
  a: array[1..12] of integer;
  i: integer;
begin
  writeln(‘ввод массива’);
  randomize;
  for i := 1 to 12 do
  begin
    a[i] := random(10) + 1;
    write(a[i], ‘, ‘)
  end;
  writeln;
  for i := 1 to 12 do
    if a[i] = i then writeln(‘a[‘, i, ‘]=’, a[i])
end.

По результатам работы программы в таблице нужно закрасить те ячейки, где выполняется условие $$A[i] = i$$. Для данного варианта это ячейки:

• $$A[4] = 4$$
• $$A[7] = 7$$
• $$A[10] = 10$$

Остальные элементы массива не совпадают со своими индексами.

Ответ

Найденные элементы: $$A[4]$$, $$A[7]$$, $$A[10]$$.