Вывести на экран натуральные степени числа 2, которые меньше N

@Badproge · Регистрация: 18.02.2020

Author24 — интернет-сервис помощи студентам

Ввести с клавиатуры число N (N<10⁹).

Вывести на экран натуральные степени числа 2, которые меньше N.

@ZX Spectrum-128 · 03.03.2020, 10:25

Pascal

var
  x: real; 
  n, i: integer;
 
begin
  x := 1; 
  i := 0;
  readln(n);
  repeat
    Writeln(i:5, x:12:0);
    x := x * 2; 
    Inc(i);
  until x > n;
end.

@Badproge 0 / 0 / 0 Регистрация: 18.02.2020 Сообщений: 34
		1
	Вывести на экран натуральные степени числа 2, которые меньше N 02.03.2020, 22:45. Показов 2307. Ответов 1 Метки цикл repeat (Все метки) Ввести с клавиатуры число N (N<10⁹). Вывести на экран натуральные степени числа 2, которые меньше N. 0

	03.03.2020, 10:25

Вывести на экран натуральные степени числа 2, которые меньше N

Решение