Вклассе 35 учеников. все они являются читателями школьной и районной библиотек. из них 25 берут книги в школьной библиотеке, 20-в районной. сколько из них: а) не являются читателями школьной библиотеки б) не являются читателями районной библиотеки. в)являются читателями только школьной библиотеки. г) являются читателями только районной библиотеки. д)являются читателями обеих библиотек?

В классе 30 учеников. Все они являются читателями школьной и районной библиотек. Из них 20 ребят берут книги в школьной библиотеке, 15 — в районной. Сколько учеников не являются читателями школьной библиотеки? Решение. Пусть круг Ш изображает читателей только школьной библиотеки, круг Р — только районной. Тогда ШР — изображение чи­тателей и районной, и школь­ной библиотек одновременно.Из рисунка следует, что число учеников, не являющихся чита­телями школьной библиотеки, равно:(не Ш) = Р - ШР.Всего 30 учеников, Ш = 20 человек, Р = 15 человек. Тогда значение ШР может быть найдено так (см. рисунок): ШР = (Ш + Р) - 30 = (20 + 15) - 30 = = 5, т.е. 5 учеников являются читателями школьной и районной библиотек одновременно. Тогда (не Ш) = = Р- ШР= 15- 5= 10.ответ: 10 учеников не являются читателями школьной библиотеки.

Чтобы перевести целое число Х из 10-ной системы в любую другую с основанием Q:1. делим Х на Q, в результате чего получается целая часть частного и остаток (может быть равен нулю, если разделилось нацело).2. если полученная целая часть частного меньше Q, переходим к шагу 3. Если равно или больше Q, снова делим целую часть частного на Q, как описано в шаге 1. Внимание: делится только целая часть, остаток в делении не участвует (он пригодится позже).3. все полученные остатки и последняя целая часть частного (меньшая, чем Q) преобразуются в соответствии с таблицей перевода в цифры той системы счисления, в которую выполняется перевод. Иными словами, если, к примеру, при переводе в 16-ную систему у вас получился остаток 12, то его нужно преобразовать в 16-ную цифру С.4. Получаем ответ. Его первая (старшая) цифра - последнее частное, а остальные - остатки от деления, записанные в порядке, обратном порядку их получения.Система счисления – это представления любого числа с определенного набора символов, называемых цифрами. Основание системы счисления – это количество цифр, используемых в данной системе счисления.Позиционными называются системы счисления, в которых значение цифры зависит от ее места (позиции) в записи числа. Непозиционными называются системы счисления, в которых значение цифры не зависит от ее места (позиции) в записи числа.Позиционной является привычная для нас в повседневной жизни десятичная система счисления, в которой значение (вес) цифры зависит от ее позиции в записи числа. В числе 1111 одна и та же цифра 1 означает последовательно единицу, десяток, сотню, тысячу.Все системы счисления, используемые в информатике (двоичная, восьмеричная, шестнадцатеричная и т. д.), являются позиционными. Это важно, т. к. правила образования чисел, перевода из одной системы в другую, выполнения арифметических операций во всех позиционных системах аналогичны.Непозиционной системой счисления является, например, римская. Правила выполнения арифметических операций в непозиционных системах счисления совсем иные.В 2-ной системе основание равно 2, т.е. используется всего 2 цифры - 0 и 1. В 8-ной основание равно 8, используются цифры от 0 до 7. В 16-ной системе основание равно 16, используются цифры от 0 до 15. Использование цифр 10, 11, 12, 13, 14, 15 в записи чисел неудобно, т. к. трудно отличить, например, цифру 12 от двух цифр – 1 и 2. Поэтому условились цифры от 10 до 15 обозначать латинскими буквами в порядке алфавита A, B, C, D, E, F.

1. Типовое "школьное" решение

const
  nn=20; { указать максимально возможный размер }
var
  a:array[1..nn,1..nn] of integer;
  n,i,j,mx,k:integer;
begin
  Randomize;
  Write('n='); Read(n);
  mx:=-20; { меньше минимально возможного }
  for i:=1 to n do begin
    for j:=1 to n do begin
      a[i,j]:=Random(21)-10;
      Write(a[i,j]:4);
      if a[i,j]>mx then begin mx:=a[i,j]; k:=1 end
      else
        if a[i,j]=mx then Inc(k)
      end;
    Writeln;
  end;
  Writeln('Максимальное значение ',mx,' встречается ',k,' раз(а)')
end.

Пример работы программы
n=10
   3  -1  -6  10  -9  -8  -7   1   2  -9
   0   6  -1  -2   2   7   3  -5  -2   6
   6   0  -3   0  -6   1   9   9  -6 -10
  -3   7  -3  -4 -10   6  -8  -9 -10  -3
  -1  -1   1   0   1   8  -8   6   7  -5
  -1   1   0  -4  -9  -8  -9   4   5   0
  -6  -5  -4   2   5   3  -2  -8  -3   6
   5   1  -6 -10  -4  -3  10   7  10  -4
  -1  -7  -9  10   2   7  -3  -9  -6   8
   4  -2  -4   1  -7  -7  -8  10   6   8
Максимальное значение 10 встречается 5 раз(а)

2. Решение на основе базовых возможностей PascalABC.Net 3.2

var
  a:array[,] of integer;
begin
  Randomize;
  var n:=ReadInteger('n=');
  SetLength(a,n,n);
  var mx:=-20; // меньше минимально возможного
  var k:integer;
  for var i:=0 to n-1 do begin
    for var j:=0 to n-1 do begin
      a[i,j]:=Random(-10,10);
      Write(a[i,j]:4);
      if a[i,j]>mx then begin mx:=a[i,j]; k:=1 end
      else
        if a[i,j]=mx then Inc(k)
      end;
    Writeln;
  end;
  Writeln('Максимальное значение ',mx,' встречается ',k,' раз(а)')
end.

Пример работы программы
n= 10
   0   2   2 -10  -5  -4   8   6  -8  -1
  -4   5   9   3  -4  -8   6 -10   8  -3
   5   5  -2  -8   6  -7  -9   5 -10   2
   1  -7  -7  -3   0 -10   4   1   6  -1
  -2   2  -8   3   0   3   9   5  -1  -8
  10   8   3   1  10   5  -7   0  -6  -9
  -6  -7   5   0   8  -8   2   2  -8  -4
  -2  -5  -6  -1  10  -7   2   5   2  -7
  -6  -3  -5   9   3   3   0   2  -2   5
   7  -7  -4   5  -6  -6   7   2   6  -3
Максимальное значение 10 встречается 3 раз(а)