Дана последовательность чисел 1 2 4 8 16. Какой номер будет у числа 1024.

На языке Паскаль

Question

Яля

4 сентября, 20:00

+3

Ответы (1)

Знаете ответ на вопрос?

Тиф · Answer 1

Var

a, b: integer;

begin

b : = 0;

a : = 1;

repeat

b : = b + 1;

a : = a * 2;

until a = 1024;

writeln (b) ;

end.

Дана последовательность чисел 1 2 4 8 16. Какой номер будет у числа 1024.На языке Паскаль