var D,R:integer;
begin
writeln('Введите значение R: ');
readln(r);
D:=2*R;
writeln('D = ',D);
end.
От 0 до 8 иначе говоря по 8 цифр на одной позиции
количество комбинаций будет равно 64 (узнали мы это возведя количество чисел (8) в квадрат
2 в 6-й степени равно 64 значит можно закодировать 6-ю битами
Фотоаппаратом или же телефоном, так же можно планшетом, вебкамерой, видео-регистратором, и ещё что-то но я не помню как называется.
25-->11001
/////////////////////