<em>// PascalABC.NET 3.2, сборка 1427 от 24.04.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
function Pow(x,y:BigInteger):BigInteger;
begin
Result:=x;
for var i:=int64(2) to int64(y) do Result*=x
end;
begin
var x,y:integer;
Write('Введите натуральные х и у: '); Read(x,y);
if (x<=0) or (y<=0) then begin
Writeln('Неверный ввод'); Exit
end;
if x=1 then Writeln('Результат: ',y+1)
else begin
var x1:=Range(2,x).Aggregate(BigInteger(1),(a,b)->a*b);
Writeln('Результат ',Pow(x,y)+Pow(y,x1))
end
end.
<u>Пример</u>
Введите натуральные х и у: 5 8
Результат 2348542582773833227889480596789337027375682548908319870707290971532209025114608443463698998384768703032325601
5 символов в распоряжении
По формули хартли
N=2^i
5<2^3
I=3
Это столько бит весит 1 символ.
3*15= 45 бит на пароль, но нудно в байтах ,
=6 байт на пароль(8бит-1 байт)
6*30 паролей=180
Ответ : 180
1символ= 1 байт
1 байт = 8 бит
256 бит / 8 бит = 32 символа
Ответ в задании из информатики (А)
Сдвиг вправо. Например 10 : 2
В двоичной системе 1010. Сдвигаем вправо, получаем 101. Переводим 101 в десятичную систему и видим, что это 5