Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
valereiagorohov1
14.05.2022 22:39 •
Информатика
Программирование на языке паскаль! заполните массив степенями числа 2,так чтобы последний элемент массива был равен 1,а каждый предыдущий был в 2 раза больше следующего. пример 36 16 8 4 2 1
Показать ответ
Ответ:
Вано153
07.10.2020 02:18
Var a:array[1..20] of integer;
n,i:integer;
begin
readln(n);
a[n]:=1;
for i:=n-1 downto 1 do a[i]:=a[i+1]*2;
for i:=1 to n do write(a[i],' ');
end.
Пример:
15
16384 8192 4096 2048 1024 512 256 128 64 32 16 8 4 2 1
0,0
(0 оценок)
Популярные вопросы: Информатика
covavector1
11.02.2023 09:47
РЕШИТЕ ШИФР 5313438451223431331331845441224284445131624321 311362511141145421314111...
Perchyn0601
08.06.2022 20:18
Задание на фото Номер 13 На лакокрасочном производсиве выпускаются продукты семи наименований. В каждое изделие входят до трех видов различных по объему(в литрах)...
alexasnowbell
20.09.2020 21:10
На лакокрасочном производсиве выпускаются продукты семи наименований. В каждое изделие входят до трех видов различных по объему(в литрах) компонентов. Написать...
Makc857
30.09.2020 06:10
Второй максимум последовательности ограничение по времени на тест 2 секундыограничение по памяти на тест 4 мегабайтаввод стандартный вводвывод стандартный выводДана...
anfisachupina85
03.02.2022 07:05
Запишите на языке Паскаль программу, которая вычисляет сумму кодов букв в слове БАЙТ ....
rahat9
06.04.2021 17:38
Существует два типа файлов, которые могут обрабатываться в Python: 5. Мультимедийные 6. Табличные(26) 4. Кодированные 3. Двоичные 1. Графические 2. Текстовые Выберите...
kirillmrX
17.05.2021 15:14
1. Перелічіть основні об’єкти, з якими працює програмa Word. 2. Як редагування тексту ви знаєте? 3. Які параметри форматування задають на рівні символів, а які...
olga15038
18.06.2021 17:12
Речення із словосполученнями: дивитися вперед , кидати слова на вітер , лишати слід....
2047liza
18.06.2021 17:12
План рассказа кавказский пленник умоляю...
Юлианна245
18.06.2021 17:12
Сколько килограммов железа можно восстановить алюминием из 3г оксида железа iii с массовой долей примесей 10%?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n,i:integer;
begin
readln(n);
a[n]:=1;
for i:=n-1 downto 1 do a[i]:=a[i+1]*2;
for i:=1 to n do write(a[i],' ');
end.
Пример:
15
16384 8192 4096 2048 1024 512 256 128 64 32 16 8 4 2 1