По сути мы имеем числа длины 5 в трочной системе счисления.
А вместо 0, Н - 1, Т - 2
первое число ААААА = 00000 = 0
потому на 74 месте будет число 73(в десятичной) = 02201 (в троичной) = АТТАН (в требуемой записи)
<span>Цикл с предусловием </span>
<span><span>Цикл с постусловием</span></span>
<span><span><span>Цикл со счётчиком</span></span></span>
Var
a,b,c:real;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('c = ');
ReadLn(c);
WriteLn(a+b-c/(a-2*b));
<span>End.
</span>
Попробуйте такое:
uses graphABC;
var
x, y: array [1 .. 100] of integer;
mI, mJ, mK, maxR, R, i, j, k: integer;
begin
randomize;
for i := 1 to 100 do
begin
x[i] := random(600) + 10;
y[i] := random(360) + 10;
circle(x[i], y[i], 2);
end;
maxR := 0;
for i := 1 to 100 do
for j := 2 to 99 do
for k := 3 to 98 do
begin
R := abs((x[i]-x[k])*(y[j]-y[k])-(x[j]-x[k])*(y[i]-y[k])div 2);
if R > maxR then
begin
maxR := R;
if R > mI then mI := i;
if R > mJ then mJ := j;
if R > mK then mK := k;
end;
end;
setpencolor(clred);
line(x[mI], y[mI], x[mJ], y[mJ]);
line(x[mJ], y[mJ], x[mK], y[mK]);
line(x[mK], y[mK], x[mI], y[mI]);
end.
Ответ:
960 байт, 7680 бит.
Объяснение:
Для кодирования n символов требуется подобрать число, являющееся степенью двойки, большее или равное n. Степень двойки будет количеством бит, необходимых для кодирования одного символа.
Подберем подходящую степень:
не подходит
подходит, значит 6 - количество бит, необходимое для кодирования одного символа.
В пароле по условию 15 символов => потребуется 15*6=90 бит для кодирования всего пароля. Но "Каждый такой пароль в компьютерной системе записывается минимально возможным и одинаковым целым количеством байт". В одном байте, как известно, 8 бит. 90 на 8 не делится, а вот 96 как раз.
96/8 = 12 - минимально возможное количество байт для кодирования пароля. Так как 11 уже не подходит - в 11 байтах вместится всего 88 бит, а нам потребовалось 90.
Для 80 паролей объем памяти будет равен: 80 * 12 = 960 байт.
960 байт = 960 * 8 = 7 680 бит.