Блок питания, процессор, монитор, видеокарта, звуковая карта, сетевая карта, мышь, клавиатура, колонки, дисковод и т.д.
Так как в записи чисел есть цифра 2, то минимальное основание системы счисления = 3
Const
N = 20;
Var
A:array[1..N] of real;
i:integer;
S:real;
Begin
Randomize;
S:=0;
Write('Исходный массив A(',N,'):');
For i:= 1 to N do
Begin
A[i]:=random*(N*2+1)-N;
Write(' ',A[i]:0:3);
S:=S+A[i];
End;
WriteLn;
WriteLn('S = ',S);
End.
10000+4000+600+50..........
100001₂
52₈ = 101<span>010</span>₂
42₁₆ = 1000010₂
63₁₀ = 111111₂
42₁₆ - большее число