1. при регистрации в компьютерной системе каждому пользователю выдаётся пароль, состоящий из 12 символов и содержащий только символы из 26-символьного набора прописных латинских букв. в базе данных для хранения сведений о каждому пользователе отведено одинаковое и минимально возможное целое число байт. все символы кодируют одинаковым и минимально возможным количеством бит. кроме собственного пароля для каждого пользователя в системе хранятся дополнительные сведения — по 2 байта на каждого пользователя.
о скольких пользователях содержится информация в этой системе, если для её хранения потребовалось 60 кбайт?
p. s. буду , если вы мне решить эту , ибо я гуманитарий, и ничего не мыслю во всём, что касается цифр(

program _1_2; uses crt; var  dlina, shirina, vysota: real; begin  clrscr;   textcolor(14);   writeln('вычисление объёма параллелепипеда.');   writeln('введите исходные данные: ');   write('длина (см) -> ');   readln(dlina);   write('ширина (см) -> ');   readln(shirina);   write('высота -> ');   readln(vysota);   writeln('объём: ',(dlina*shirina*vysota): 7: 2);   repeat  until keypressed; end.

поскольку язык не указан пишу в том который мне удобнее

def temp-table wares no-undo

  field ware as char

  field cost as dec extent 13

  field infl as dec.

def var i as int.

def var infl as dec.

input from data.txt.

repeat:

  create wares.

  import wares.

end.

input close.

do i = 2 to 13:

    infl=random(0.0005, 0.02).

  for each wares :

        wares.cost[i]=wares.cost[i-1]*(1+infl).

  end.

end.

на столе лежали ложки,

мама приготовила нам рожки.

program dl9_aleksandr4;

var k: real; a: integer;

begin

a: =2;  

repeat

k: =sqrt(a);

writeln ('sqrt(a)=',k);

a: =a+2;

until a< =50;

readln

end.