1. Списки - особый вид форматирования абзацев. <span> </span>
Сначала считаем сколько символов, 20 символов логина + 10 символов пароля + М и Ж, то есть 20+10+2=32.
Для хранения каждого символа требуется 5 бит, так как 2^5=32.
Теперь считаем одного пользователя 15 символов логина + 10 символов пароля + 1 символ пола (М или Ж), получаем 26.
26*5=130 бит. Переводим в байты. Ближнее большее число делящееся на 8 это 17. Так как 17*8=136, а 16*8=128, не хватает до 130. Получаем на пользователя 17 байт, всего у нас 20 пользователей, 20*17=340, итого 340 байт.
Var x,y,s:real; i,k:integer;
begin
for i:=1 to 200 do
begin
x:=random;
y:=random;
if sqr(x-0.5)+sqr(y-0.5)<=0.25
then k:=k+1;
end;
writeln('Вычислено: ',k/200:6:4);
writeln('Пи/4 = ',pi/4:6:4);
end.
Пример:
<span>Вычислено: 0.7750
Пи/4 = 0.7854</span>