var n,st:integer; begin write('n = '); readln(n); st:=1; while st<=n do begin write(st,' '); st:=st*2; end; writeln; end.
Пример: n = 50 1 2 4 8 16 32
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
