Хелп ! попытайтесь заменить полную форму ветвления на два неполных ветвления: если слева стена то вправо иначе влево все всегда ли можно сделать такую замену

2^i = n

2^i = 64

i = 6 бит.

ответ. 6 бит

var

x,y: real;

begin

x: =-1;

while x< =1 do

begin

y: =x*x*x;

writeln(y);

x: =x+0.1;

end;

end.

фамилия

                  имя

          отчество

program w7w7;

var a: real;

begin

readln (a);

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

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

end.