Var a,b:array[1..10] of integer;i,j,min,min2,sum:integer;beginrandomize;for i:=1 to 10 dobegina[i]:=random(10);writeln(a[i]);end;min:= a[1]; for i:= 2 to 10 dobeginif (a[i] < min) then min:= a[i]; end;writeln('минимальный элемент 1 массива ',min);writeln('2 msssiv');for j:=1 to 10 dobeginb[j]:=random(10);writeln(b[j]);end;min2:=b[1];for j:=2 to 10 dobeginif ( b[j] < min2 ) then min2:= b[j]; end;writeln('минимальный элемент 2 массива',min2);sum:=min+min2;writeln('summa min:',sum);end.
Можно разместить посты в соц.сетях таких как:
Так же на различных форумах на разные темы!!!
В идентификаторе 2 буквы и 8 цифр.
Мощность алфавита букв равна 18, для кодирования 1 буквы требуется 5 бит, т.к. 2^5=32 (четырёх бит недостаточно).
Для кодирования 1 цифры требуется 4 бита, т.к. всего 10 цифр, 2^4 = 16 (чего достаточно для хранения 10 цифр, в отличие от 3-х бит).
Объем одного пароля равен 2*5+8*4 = 10+32 = 42 бит
42 : 8 = 6 Байт (пяти байт недостаточно).
25 * 6 = 150 байт.