Для кодирования одного из 62 символов требуется log(2)62 ≈ 6 бит.
Для хранения одного пароля необходимо 15*6 бит = 90/8 байт ≈ 12 байт.
Объем памяти, необходимый для хранения сведений об одном пользователе: 780/20 = 39 байт.
Объем дополнительных сведений для одного пользователя 39-12 = 27 байт.
Var
i,a:integer;
ch:set of char;
n:string;
Begin
Write('Введите число ');
Readln(n);
ch:=['0'..'9'];
for i:= 1 to length(n) do
if n[i] in ch then a:=a+1;
case a of
1:Write('В числе ',a,' цифра');
2..4:Write('В числе ',a,' цифры')
else Write('В числе ',a,' цифр');
End;
<span>End. </span>
Нужно через программу,легче будет)
Решила будет 6
"Каким должен быть отрезок А" - если имеется ввиду максимальная длина А - смотрим рисунок
Если есть варианты ответа - надо смотреть по числовой прямой (на рисунке) и выбирать, который из отрезков будет находиться между 13 и 37
Решение на рисунке.
Function reverse(x:longint):longint;beginvar a,b:integer;a:=0;b:=0;while x>0 dobegina:=(x mod 10);b:=((b*10)+a);x:=(x div 10);reverse:=b;end;end;var c:longint;beginwriteln('введите число');read(c);write('ваш ответ ', reverse(c));end.
Вот так как-то вроде ничего непонятного если, что пиши-поясню.