Непозиционные системы счисления это ранние системы, которые сейчас не пользуются большим спросом, поскольку в них не удобно выполнять различные арифметические действия над большими числами - об этом поподробнее.
В непозиционной системе каждая цифра имеет своё значение, которое не зависит от её положения.Небольшое отступление для понимания:
К примеру позиционная десятичная система представляет числа следующим образом: 123 - это 1 сотня, 2 десятка и 3 единиц; каждая цифра соответствует своему разряду. И складывать такие числа проще: 123+111 = (100+100)+(20+10)+(3+1) = 200+30+4 = 234.
Рассмотрим пример непозиционной системы счисления, наверное самая известная сейчас это Римская:
Число III означает 1+1+1=3. Чтобы записать число 10, используется отдельный символ X. При этом как было указано ранее, Х не может означать что-либо другое. Когда в десятичной 2 это хоть единицы, хоть сотни, главное какой разряд.
Другие примеры: Египетская, Древнегреческая, Славянская и Единичная (или унарная).
randomize;repeatwrite('Количество строк до ',nmax,' n=');readln(n);until n in [1..nmax];repeatwrite('Количество столбцов до ',nmax,' m=');readln(m);until m in [1..nmax];writeln('Исходная матрица:');for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(100); write(a[i,j]:4); end; writeln; end;writeln;k:=0;{наличие нужного столбца}j:=1;while(j<=m) and(k=0) do{идем по столбцам} begin p:=0;{наличие совпадений} for i:=1 to n-1 do{идем вниз по столбцу} for l:=i+1 to n do{смотрим впереди} if a[i,j]=a[l,j] then p:=1;{если одинаковые, фиксируем} if p=1 then k:=1{есть столбец} else j:=j+1;{нет, смотрим следующий} end;if k=1 then write('Столбец с одинаковыми элементами есть')else write('Столбца с одинаковыми элементами нет');readlnend.