Код ко второй и восьмой задачам:
{2-nd task}
var t,p,x,a,y: real;
begin
write('t = ');
readln(t);
write('p = ');
readln(p);
write('x = ');
readln(x);
write('a = ');
readln(a);
y:= (exp(ln(t)*p))*(exp(ln(x)*5))*(1 - (x - (exp(ln(a)*x)))/((exp(ln(x)*2)) + 5.3));
writeln('y = ',y:0:2);
end.
{8-th task}
var x,a,y,b,r,q,d: real;
begin
write('a = ');
readln(a);
write('y = ');
readln(y);
write('b = ');
readln(b);
write('r = ');
readln(r);
write('q = ');
readln(q);
write('d = ');
readln(d);
x:= ((exp(ln(cos(y))*a)) - (exp(ln((sin(exp(ln(r)*8*q*b)))/((exp(ln(d)*(2*a*b))) + 18.31);
writeln('x = ',x:0:2);
end.
Для алфавита нужно выделить 5 бит на 1 символ
т.к.2^4=16 символов - мало
2^5=32
т.к. всего в пароле 15 символов то весить он будет
15*5=75 бит
1 пароль по условию кодируется минимально возможным целым количеством байт
75/8=9,375
т.е. для хранения пароля нужно 10 байт
Один пароль "весит" 10 байт.
У нас — 20 пользователей (и 20 паролей соответственно).
Следовательно, они "весят" 10х20 = 200 байт.
Для пользователей выделено дополнительно 10 байт, т.е. еще 200 байт на всех
т.е. для хранения сведений нужно 200+200 байт 400 байт