Компьютер выполняет перебор со скоростью 10 млн паролей в секунду. Определите, какова должна быть длина - id1059265620220629 от Mider123 29.06.2022 10:19

Question

Информатика: Компьютер выполняет перебор со скоростью 10 млн паролей в секунду. Определите, какова должна быть длина пароля, чтобы время его взлома составило не менее 1 месяца, если: а) пароль состоит только из цифр; б) пароль состоит только из прописных латинских букв и цифр; в) пароль состоит только из латинских букв (заглавных и строчных) и цифр.

Mider123 · Accepted Answer

Var
    x, y: array[1..100] of integer;
    i, n, k: integer;
    min, max: integer;

begin
    {ввод массива}
    write('n = ');
    readln(n);

    writeln('Данные массива:');
    for i := 1 to n do
    begin
        readln(x[i]);

    end;
    writeln();

    {минимум и максимум}
    max := x[1];
    min := x[1];
    for i := 1 to n do
    begin
        if max < x[i] then max := x[i];
        if min > x[i] then min := x[i];
    end;
    writeln('max = ', max);
    writeln('min = ', min);
    writeln('avg = ', (max + min) / 2);

    max := (max + min) / 2;
    k := 0;
    for i := 1 to n do
    begin
        if x[i] >= max then begin
            k := k + 1;
            y[k] := x[i];
            write(y[k], ' ');
        end;
    end;
end.

MOGZ ответил