Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
koshuba2017
25.05.2021 16:36 •
Информатика
Заполните массив степенями числа 2 ( от 2 в 1 степени до 2 в энной степени) паскаль abcnet
Показать ответ
Ответ:
xaverqenizadeoxg0iy
08.10.2020 11:57
Var a:array [1..30] of integer;
i,x,n:integer;
begin
x:=1;
write('Введите степень 2 (n<=30): ');
readln (n);
for i:= 1 to n do
begin
a[i]:= x*2;
write(a[i],' ');
x:=x*2
end
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
anastasia69smirnova
26.04.2023 09:49
Операционные системы и среды Первый разбор...
ccfnwj3662
14.09.2022 04:38
дан фрагмент электронной таблицы в режиме отображения формул. Чему равен результат вычислений в ячейка C3...
mahamde
14.06.2022 08:20
Как сделать сетку в логомирах3?...
adwa113eПомошник
26.01.2022 15:14
Интернет желісінің мүмкіндіктерін пайдалана отырып, Intel компаниясының процессорларының даму эволюция-сына өз беттеріңмен талдау жасаңдар....
Владrar
09.08.2021 09:05
В Единой коллекции цифровых образовательных ресурсов найдите лабораторную работу «Изучение закона сохранения импульса». В её основу положена математическая модель, описывающая движение...
1236811
22.09.2020 16:04
изображение, подпишите вид сноски, используемый в документе СОР ОЧЕНЬ...
brigr
02.11.2020 06:50
WORD мәтіндік редакторы қандай мәселелерді шешуге арналған?...
798210374
25.04.2020 08:25
Св паскаль, . 1. в файловую переменную занести 20 вещественных чисел, последовательно вводимых с клавиатуры. сохранить данный файл на жестком диске. 2. имеется внешний текстовый...
ehot2004
14.11.2020 02:32
Создать массив в из десяти целых чисел. вывести полученный массив на экран. подсчитать сумму положительных и количество отрицательных элементов массива...
154Dance3
05.09.2021 15:34
3относительных предложений составить и 3 вопросительных...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,x,n:integer;
begin
x:=1;
write('Введите степень 2 (n<=30): ');
readln (n);
for i:= 1 to n do
begin
a[i]:= x*2;
write(a[i],' ');
x:=x*2
end
end.