1⁸1⁷1⁶0⁵1⁴0³1²0¹0⁰₂ = = 0 + 0 + 4 + 0 + 16 + 0 + 64 + 128 + 256 = 468₁₀
Var
c : integer;
k : char;
begin
c := 0;
while not eoln do
begin
read (k);
if k = ' ' then
begin
if c > 10 then
begin
write ('YES');
halt;
end;
c := 0;
end
else
c := c + 1;
end;
if c > 10 then write ('YES') else write ('NO');
end. <span>
</span>
предлагаю решение на Паскале
var n: integer;
begin
read (n);
if (n mod 5)=0 then n:=n*4
else
n:=n-25;
writeln ('n=',n);
end.
100011.01(2) × 10100.1(2) = 1011010010.101(2) ну ей богу такое могет даже виндосовский калькулятор, если знать куда тыкать
Мышка налила в первое ведро 15 капель и вылила во второе ведро , потом опять набрала в первое ведро 15 капель и вылила во второе ведро.Во втором ведре получилось 30 капель и мышка опять набрала 15 капель в первое ведро и налила из первого во второе наполнив второе ведро доконца , так что во втором ведре получилось 35 капель , а в первом 10. И мышка дала коту первое ведро с десятью каплями!