Есть ответ 👍

факти про опрацювання інформації​

111
248
Посмотреть ответы 1

Ответы на вопрос:

Dronton
4,6(97 оценок)

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

Популярно: Информатика