1)сколько всего букв и цифр используется?26+10(цифры)=36, ближайшая степень двойки большая 36-это 64, то есть два в 6. то есть шесть бит занимает каждый символ пароля.
2)в пароле 9 символов, 9*6=54 бит нужно для хранения одного пароля
3)54бит/8=7байт нужно для хранения одного пароля(в одном байте 8 бит)
4)значит сто паролей занимают 700 БАЙТ
1) Var a, b,i:integer ;
Begin
Write('a=') ;read(a) ;writeln;
Write('b=') ;read(b) ;writeln;
If b-a>0 then write(' Колво целых чисел ', b-a-1)
Else If b-a=0 then write (' Колво целых чисел ', 0)
Else write(' неверные данные') ;writeln;
For i:=b-1 downto a+1 do begin
Write(' ', i) ;
End;
End.
2)Var i:Integer ;
F:array [1..30]of Integer ;
Begin
F[1]:=1;f[2]:=2;
Write(' ', f[1],' ', f[2]);
For i:=3 to 30 do begin
F[i] :=f[i-1]+f[i-2];write(' ', f[i]) ;
End;
End.
Видно так тебе нужно было код написать но тот код лучше который на скрине у тебя !!!
Да, сработает. Все правила ввода соблюдены.