Ответ(ы) на вопрос:
Гостьvar a,c:integer;begin a:=1; c:=0;while a <> 1024 do beginif a <> 1024 then beginc:=c+1; a:=a*2;end;end;writeln(c); end.
Не нашли ответ?
Похожие вопросы
Гость