У вашего друга день рожденье и Вы хотите использовать бинарное число для свеч на торте. Вы планирует использовать зеленые свечи для обозначения «1» и серые свечи для «0». Какое наименьшее число свечей Вам нужно взять, чтобы отметить 18 год рождения друга?

4: 2

2|0

1|0

0|1

4₁₀=100₂

10: 2

5|0

2|1

1|0

0|1

10₁₀=1010₂

1996: 2

998|0

499|0

249|1

124|1

62|0

31|0

15|1

7|1

3|1

1|1

0|1

1996₁₀=11111001100 

100.1010.11111001100     

800*600*24*4/8=5760000 байт=5625 кбайт

program strangle;

var

a: integer;

begin

readln(a);

if a = 180 then writeln('yes') else writeln('no');

end;

program w7w7;

var a: real;

begin

readln (a);

if a< 0 then writeln ('otritsatelnoe chislo');

if a> 0 then  writeln ('pologitelnoe chislo');

end.