Всего используется символов = 12 букв + 10 цифр = 22 символа
2^x>=22, x = 5 (бит)
5 бит используется для кодирования 1 символа
1 номер = 5(бит) * 6(символов) = 30 (бит) / 8 = 3,75 (байт)
Const N = 10;
var i, max: integer;
a: array[1..N] of integer;
begin
max := 1;
writeln('Массив до: ');
for i := 1 to N do begin
a[i] := random(10);
write(a[i]:3);
if(a[i] > a[max]) then max := i;
end;
writeln(#10, 'Массив после: ');
for i := 1 to N do begin
if(a[i] > 1) and (a[i] < 4) then a[i] := a[max];
write(a[i]:3);
end;
writeln(#10, 'Максиммальный элемент: ', a[max], #10, 'Его индекс: ', max);
end.
Audi; BMW; Volkswagen; Datsun; KIA