var
a, d, c, k: <em>real</em>;
begin
readln(a, d, c, k);
writeln((a - (d + 21) * 2) * (c - 7 * k));
end.
Может быть использовано
10 цифр+ 26 строчных букв + 26 прописных + 6 спец символов = 68 символов всего.
Для кодирования 68ми символов достаточно диапазона чисел от 0 до 67
(2^6=64)<67<(2^7=128)
Таким образом необходимо минимум 7 бит на символ.
7*9=63 бита на один пароль.
63*100=6300 битов на 100 паролей.
6300/8 = 787,5 байт.
Округляем в большую сторону - ответ 788 байт
Cначало умножаем a с х и 2 a*x*2 -> 5*(-5)*2=-50
затем умножаем b на x b*x -> 9*(-5)=-45
и плюсуем все -50+(-45)+12=-95+12=-83
Var a,b,c,max: Integer;
begin
writeln('Введите a,b,c');
readln(a,b,c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln('Наибольшее число: ',max);
end.
<span>100011011101 = 2269. Изначально число уже в двоичной системе</span>