основанием системы счисления называется количество разных знаков либо символов, которые используются для изображения цифр в этой системе. основанием принимают всякое натуральное число — 2, 3, 4, 16 и т.д. то есть, существует безграничное множество позиционных систем. например для десятичной
системы основание равно 10. база системы — это последовательность цифр, используемых для записи числа. ни в одной системе нет цифры, равной основанию системы. как можно догадаться, сколько есть чисел, столько же может быть и оснований систем счисления. но используются только самые удобные основания
систем счисления.
Program Pr1;
uses crt;
var mas:array[1..100] of integer;
pos:array[1..100] of integer;
min:array[1..100] of integer;
i,b,c:integer;
Begin
clrscr;
b:=0;
c:=0;
randomize;
for i:=1 to 100 do mas[i]:=-100+random(200);
for i:=1 to 100 do write(mas[i]);
writeln();
for i:=1 to 100 do if mas[i]>=0 then begin
b:=b+1;
pos[b]:=mas[i];
end
else begin
c:=c+1;
min[c]:=mas[i];
end;
writeln('Polojitelnye');
for i:=1 to b do write(pos[i]);
writeln();
writeln('Otricatylnye');
for i:=1 to c do write(min[i]);
end.