Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
sahakohela
09.11.2021 12:04 •
Информатика
Дано целое число n (> 0). сформировать и вывести целочисленный массив размера n, содержащий степени двойки от первой до n-й : 2, 4, 8,
Показать ответ
Ответ:
maxtrimfxus
28.06.2020 22:10
Var
a,b,n:integer;
begin
a:=2;
readln(n);
write(a,' ');
for b:=1 to n do
begin
a:=a*2;
write(a,' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Евангелина12345
17.07.2022 21:34
Упростить выражение. Построить таблицу истинности. Построить СДНФ, СКНФ. Построить логические схемы для СДНФ или СКНФ. Ничего не понимаю в алгебре логики...
kz666zlo1
07.11.2020 10:23
решить кроссворд по информатике...
amalia110
03.04.2023 16:01
Почему в любой непозиционной системе счисления отсутствует цифра «ноль»...
mlphappyme
18.08.2022 09:14
Оцените сборку: R3 3100 box gtx 1070 б/у DDR4 16gb. 2666b450m s2hssd 120 palitcooler master 500w mwe v2.корпус самодельный)покупать собираюсь за 40к...
sematom
04.03.2023 19:28
пользователь вводит значение с клавиатуры если она начинается на abs то заменить их на www иначе добавить в конец zzz на Пайтон...
needhomework19
19.12.2020 17:19
Запишите значение переменной s, полученное в результате следующей программы ( Есть программисты ) int s=0;for (int k=3; k =7; k++)s +=6;cout s;...
dabby25
06.07.2020 00:50
Какие существуют моделирования? 1 Графический 2 Знаковый 3 Табличный 4 Функциональный 5 Образный...
mishishinatany
26.02.2020 19:39
Парус трапециевидной формы. Одним словом...
asylkhanova05
13.04.2023 14:32
Выполните программу и ответьте на следующие вопросы Program Demo1; Var F,N:real; Begin N:=5; While N =6 do Begin F:=sqr(N)+sqrt(N)/(N-24); Writeln(F:7:4); N:=N+0.1; End; End....
228GGnyb
30.05.2023 13:44
хелп. На питоне. В инете нет Даны катеты прямоугольного треугольника. Найти его периметр....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b,n:integer;
begin
a:=2;
readln(n);
write(a,' ');
for b:=1 to n do
begin
a:=a*2;
write(a,' ');
end;
end.