var n,s:integer;
x1,x2,x3,x4:integer;
begin
write('Vvedite N = ');
read(n);
x1:=n div 1000;
x2:=n mod 1000 div 100;
x3:=n mod 100 div 10;
x4:=n mod 10 div 1;
s:=x1+x2+x3+x4;
writeln(s);
end.
Program z1;
var x,y:integer;
begin
readln(x,y);
if x>y then writeln(x) else writeln (y);
end.
Либо одна собака (4 лапы) и три курицы (6 лап), либо две собаки (8 лап) и одна курица (2 лапы)
Для перевода чисел из двоичной в восьмеричную систему счисления двоичное число делят на группы по 3 разряда (в целой части - справа налево, в дробной - слева направо) и каждую группу заменяют на соответствующую ей восьмеричную цифру.
110000110101(2) = 110 000 110 101(2) = 6065(8)
1010101(2) = 1 010 101(2) = 125(8)
0,10100111001(2) = 0,101 001 110 010(2) = 0,5162(8)
0,1111110001(2) = 0,111 111 000 100(2) = 0,7704(8)
63 символа 63 байт
(если в конце предложения будет стоять точка, то будет 64 байта)