Определить из каких цифр состоит десятизначное число паскаль программа + блок-схема

var n: integer; x1,x2,x3,x4,x5,x6,x7,x8,x9,x10: integer; beginread(n); x1: =n div 1000000000; x2: =n mod 1000000000 div 100000000; x3: =n mod 100000000 div 10000000; x4: =n mod 10000000 div 1000000; x5: =n mod 1000000 div 100000; x6: =n mod 100000 div 10000; x7: =n mod 10000 div 1000; x8: =n mod 1000 div 100; x9: =n mod 100 div 10; x10: =n mod 10 div 1; writeln('1 = ',x1); writeln('2 = ',x2); writeln('3 = ',x3); writeln('4 = ',x4); writeln('5 = ',x5); writeln('6 = ',x6); writeln('7 = ',x7); writeln('8 = ',x8); writeln('9 = ',x9); writeln('10 = ',x10); end.

Дано: n=26*2+10=62 символа кол-во пользователей - 30 всего байт - 870 байт кол-во символов на один пароль - 10 символов решение: воспользуемся формулой  , где n - кол-во символов в алфавите, i - информационная емкость одного символа(кол-во бит на 1 символ) тогда: ищем ближайшие степени двойки: берем 2^6, так как в 2^5 не влезет 62 символа. в итоге i=6 бит определим кол-во бит на один пароль: 6*10=60 переведем в байты, округляя в большую сторону: 60/8=7,5 ≈8 байт определим кол-во байт на 1 пользователя: 870/30=29 байт из этих 29 байт 8 байт отведено на пароль, остальное - дополнительные сведения. тогда: 29-8=21 байт - дополнительные сведения ответ: 21

Дано: n=26*2+10=62 символа кол-во пользователей - 30 всего байт - 870 байт кол-во символов на один пароль - 10 символов решение: воспользуемся формулой n=2^i, где n - кол-во символов в алфавите, i - информационная емкость одного символа(кол-во бит на 1 символ) тогда: 62=2^i ищем ближайшие степени двойки: 2^5=32 2^6=64 берем 2^6, так как в 2^5 не влезет 62 символа. в итоге i=6 бит определим кол-во бит на один пароль: 6*10=60 переведем в байты, округляя в большую сторону: 60/8=7,5≈8 байт определим кол-во байт на 1 пользователя: 870/30=29 байт из этих 29 байт 8 байт отведено на пароль, остальное - дополнительные сведения. тогда: 29-8=21 байт - дополнительные сведения ответ: 21