Ответы на вопрос:
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
Популярно: Информатика
-
Сколько чисел от 1 до 100 включительно удовлетворяют такому условию: (x div...
danilbalabanov26.04.2022 07:58 -
Входят ли в одну подсеть устройства с адресами 193.125.78.100/28 и 193.125.78.93/28...
StefaMusic200605.05.2023 17:30 -
Аналитикалык машинаны Ким ойлап тапты...
tolikstrikashi25.06.2021 11:03 -
Сложить два положительных целых числа каждое может иметь до 30 цифр. Числа...
sok613.10.2020 06:27 -
Python. Нужно чтобы программа считала разность 1000 и 7 до того момента,...
вова555555503.12.2020 22:45 -
вы смотрите в кинотеатре фильм с 3д эффектом в очках на рисунке назовите...
romaantonizin117.06.2020 17:29 -
Составь программу, в которой выводится список уроков, которые у вас будут...
kravchenko171231.01.2020 07:56 -
5.Для сохранения документа MS Word выполнить. Несколько вариантов выбора....
24301327.10.2022 18:00 -
Сколько памяти необходимо для хранения изображения с оттенками серого цвета...
zadorina6620.11.2021 14:06 -
Перевести из двоичной системы счисления в десятичную 10111100,10111,1101010...
Мирэя27.11.2021 12:19