1)в журнале успеваемости учащихся со сведениями о годовых оценках требуется осуществить поиск всех отличников по информатике.что в этой ситуации является набором данных? ключом поиска ? критерием поиска? 2)можно ли каталог библиотеки назвать списком указателей? почему ? если да то какой он простой или многоуровневый?

1. набор данных - все данные, по которым мы ищем. то есть тут

    ключ - поле "оценка по информатике". критерий: оценка 5 в поле "оценка по информатике".

2. да. многоуровневый, т.к. книги делятся по темам, по подтемам, по авторам.

Программа: const   n = 5;   m = 5;   var   a: array[1..n, 1..m] of integer;   i, j: integer;   function check(i: integer): boolean; var j: integer; begin   check : = false;   j : = 0;   repeat       inc(j);       if a[i, j] < 0 then       begin           check : = true;           exit;       end;   until j = m; end;   function search: integer; var i: integer; begin   search : = 0;   i : = 0;   repeat       inc(i);       if not(check(i)) then       begin           search : = i;           exit;       end;   until i = n; end;   begin   writeln('введите матрицу ', n, 'x', m,': ');   i : = 0;   repeat       j : = 0;       inc(i);       repeat           inc(j);           read(a[i, j]);       until j = m;   until i = n;   writeln('ответ: ', search); end. пример работы программы: введите матрицу 5x5: 3 4 2 3 -2 3 -5 -7 -2 1 8 2 5 4 -4 0 1 2 3 4 1 7 2 -5 2 ответ: 4 * примечание: если во всех строках есть отрицательные элементы, то ответ будет 0 (можно изменить в самой процедуре)

Программа без использования массива: var   i, n, a, max, max2: integer; begin   write('введите количество чисел: ');   read(n);   write('введите числа: ');   for i : = 1 to n do   begin       read(a);       if a > max then       begin           max2 : = max;           max : = a;       end;   end;   writeln('два наибольших значения - ', max2, ' и ', max); end. пример работы программы: введите количество чисел: 6 введите числа: 12 15 5 7 23 7 два наибольших значения - 15 и 23