Program Premier_liga_2;
var B, Diff: array [1..16] of integer;
Team: array[1..16] of string;
I, K, X, Z, P: integer;
St: string;
begin
writeln('Введите названия команд и полученные ими очки');
for I:=1 to 16 do
begin
write(I, ' Название: '); readln(Team[I]);
write('Очки: '); readln(B[I]);
write('Забитые мячи: '); readln(Z);
write('Пропущенные мячи: '); readln(P);
Diff[I]:= Z-P;
end;
for K:=1 to 15 do
for I:=1 to 16-K do
if (B[i] < B[I+1]) or
((B[i] = B[I+1]) and (Diff[i] < Diff[I+1])) then
begin
X:=B[I]; B[I]:=B[I+1]; B[I+1]:=X;
St:=Team[I]; Team[I]:=Team[I+1];
Team[I+1]:=St;
end;
for I:=1 to 16 do
begin
for K:=1 to 18-length(Team[I]) do
Team[I]:=Team[I]+' ';
writeln(I:2,' ',Team[I]:18,B[I]:2)
end;
end.
Вот программа но у меня выдает ошибку в 29 строчке

А) У нас есть число в двоичной системе счисления: 01001100. Над каждой цифрой напишем ее разряд (справа налево; разряд начинается с 0). Затем мы первую цифру данного нам числа должны перемножить на основание данного нам числа ( т.к 01001100 - двоичное число, то основание соответственно равно 2) в какой-то степени ( степень определяется разрядом цифры), затем нужно проделать это со всеми цифрами числа и сложить результаты(все это делается с право налево).
01001100(2) = 1*2^6 + 1*2^3 + 1*2^2 = 76(10) ( 0 можно опускать, так как при умножении на 0 всегда будет 0)
б) 00010101(2) = 1*2^4 + 1*2^2 + 1*2^0 = 21(10)
P.s Так как код прямой, то все разряды являются целом числом в двоичном коде. Самый крайний левый разряд определяет знак числа в десятичной системе счисления ( если 0, то +, если 1, то -)

Файл (ағылш. File) — дерек сақтаудың негізгі бірлігі болып табылады.

Файл компьютердің бір дерек жинағын екіншісінен айыруына мүмкіндік береді. Мәтін жазылған немесе суреті бар кез келген қағаз құжат сияқты, файл дерек жинағы болып табылады, ондағы деректі бөліп алуға, өзгертуге, жоюға, сақтауға я болмаса басып шығарғыш немесе электрондық пошта бағдарламасы сияқты шығару құрылғысына жіберуге болады. Файлдардың ішінде бағдарлама, бағдарламада қолданылатын деректер немесе пайдаланушы жасаған құжат болуы мүмкін.