7 класс 1 четверть Вопросы к зачету
1. Информация
2. Непрерывный сигнал
3. Дискретный сигнал
4. Виды информации
5. Свойства информации
6. Определение каждого свойства
7. Информационные процессы
8. Основные информационные процессы
9. Информационная деятельность
10. Обработка информации
11. Структурирование
12. Кодирование
13. Что значит сохранить информацию
14. Схема передачи информации
15. Всемирная паутина
16. Знак
17. Знаковая система
18. Язык
19. Дискретизация информации
20. Алфавит
21. Двоичный алфавит
22. Двоичное кодирование
23. Двоичный код
24. Равномерный код
25. Неравномерный код​

Program Project1;

var m:array [0..14] of integer; i:integer;

function IsPositive(a:integer):boolean;
begin
  result:=(a>-1);
end;

procedure work;
var min, max, count:integer;
begin
  count:=0;
  min:=m[0];
  max:=0;
  for i:=0 to 14 do begin
    if IsPositive(m[i]) then begin
      inc(count);
      if m[i]>max then max:=m[i];
      if m[i]<min then min:=m[i];
    end;
  end;
  writeln('MAX: ', max);
  writeln('MIN: ', min);
  writeln('Count: ', count);
end;

begin
  for i:=0 to 14 do begin
    write('n: ');
    readln(m[i]);
  end;

  work;

  readln;
end.

Таких систем исчисления всего две.  Основание а = 9 и основание а =367, но в системе с основанием 367 проблематично записывать числа (символов не хватит).
Если число 3306(10) в системе исчисления с основанием а заканчивается цифрой 3, то тогда
число 3303 делится на основание системы а.
Отсюда алгоритм поиска.  Находим все делители числа 3303.
3303 = 3*1101 = 3*3*367.  Число 367 - простое. Поэтому основаниями системы исчисления 
могут быть только 3, 9, 367.  Основание =3 не подходит, так как по условию число должно заканчиваться на 3  -> основание больше 3.  Остаются 9, 367.