Маленький вася пошел в зоопарк.там на пруду он увидел одну цаплю,несколько гусей и вдвое больше овец.всего вася насчитал n ног. васе определить,сколько гусей и овец на пруду
Program Lake; Var a, b, n: Integer; Begin WriteLn('n = '); ReadLn(n); If n < 2 Then WriteLn('Error!') Else Begin n := n - 2; a := n div 3; b := a * 2; WriteLn('На пруду ',a , ' гусей и ',b , ' овец.'); End; ReadLn; End.
Современный компьютер может обрабатывать числовую, текстовую, графическую, звуковую и видео информацию. Все эти виды информации в компьютере представлены в двоичном коде, т. е. используется всего два символа 0 и 1. Связано это с тем, что удобно представлять информацию в виде последовательности электрических импульсов: импульс отсутствует (0), импульс есть (1).
Такое кодирование принято называть двоичным, а сами логические последовательности нулей и единиц - машинным языком.
Какой длины должен быть двоичный код, чтобы с его можно было закодировать васе символы клавиатуры компьютера?
Достаточный алфавит
В алфавит мощностью 256 символов можно поместить практически все символы, которые есть на клавиатуре. Такой алфавит называется достаточным.
Т.к. 256 = 28, то вес 1 символа – 8 бит.
Единице в 8 бит присвоили свое название - байт.
1 байт = 8 бит.
Таким образом, информационный вес одного символа достаточного алфавита равен 1 байту. Для измерения больших информационных объемов используются более крупные единицы измерения информации:
После четвёртого шага я заметил, что наша строка состоит из подстрок "1001" и "0110". Количество таких подстрок после третьего шага начинает увеличиваться в два раза с каждым шагом. Например, в третьем шаге подстрока"10010110" - одна, а в четвёртом - две. Исходя из этого можно вынести, что в пятом шаге их - четыре (кто сомневается - проверьте). Составим таблицу, благодаря которой мы узнаем, сколько подстрок "10010110" будет в строке после одиннадцатого шага: 3. 1 4. 2 5. 4 6. 8 7. 16 8. 32 9. 64 10. 128 11. 512
После одиннадцатого шага строка будет иметь 512 подстрок "10010110" - то есть, состоять из 512 * 8 = 4096 символов. Это всего лишь отступление.
В одной подстроке "10010110" - 4 единицы. Значит, в 512 таких подстроках их будет 512 * 4 = 2048 штук.
Program Lake;
Var a, b, n: Integer;
Begin
WriteLn('n = ');
ReadLn(n);
If n < 2 Then
WriteLn('Error!')
Else
Begin
n := n - 2;
a := n div 3;
b := a * 2;
WriteLn('На пруду ',a , ' гусей и ',b , ' овец.');
End;
ReadLn;
End.