Жизненный опыт которого передает родитель ребенку
Var a,b,a1,b1:real;
begin
readln(a,b);
if a = b then writeln('Числа равны')
else
if a>b then begin
a1:=2*a*b; b1:=(a+b)/2;
a:=a1;b:=b1;
writeln('a = ',a,' b = ',b)
end
else begin
b1:=2*a*b; a1:=(a+b)/2;
a:=a1;b:=b1;
writeln('a = ',a,' b = ',b);
end;
end.
В)наверно
кассир и сам справится
а дворник зачем?
Если речь идет о MS Word, то их 3: нумерованный, маркированный, многоуровневый.
1. k=4096 символов
I=1/512 Мб=2кБ=16384бит
i=4бита
N=16. Мощность алфавита 16
2. k=256 символов
N=12
- минимально возможное число бит для кодирования символа - 4
i=4
I=k*i=256*4=1024 бита=128 байт