Глава 3Кодирование и обработка числовой информацииКонтрольные вопросы-2.Каково основание десятичной системы счисления?Двоичной с
Глава 3 Кодирование и обработка числовой информации Контрольные вопросы- 2.Каково основание десятичной системы счисления?Двоичной системы счисления?Восьмеричной системы счисления?Шестнадцатеричной системы счисления? рееешитее пожалуйстааа)
Const m = 10; var a: array[1..m] of integer; i,j, min: integer; begin write ('Исходный массив: '); for i := 1 to m do begin a[i] := random(100); if (i=1) or (a[i]<min) then min:=a[i]; write (a[i],'; '); end; writeln; for i:=1 to m do begin if a[i]=min then begin for j:=i to m-1 do a[j]:=a[j+1]; break; end; end; a[m]:=0; write('Измененный массив: '); for i := 1 to m-1 do write (a[i],'; '); <span>end.</span>