Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
SlavaPereli
11.09.2021 13:12 •
Информатика
Выведите на экран n-первых натуральных степеней числа 2. (в pascal).
Показать ответ
Ответ:
nastyaivanko09
02.10.2020 04:13
Program gt;
var n,i:integer;
p:real;
begin
readln(n);
p:=1;
for i:=1 to n do
begin
p:=p*2;
writeln(i,' ',p);
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Чикчирик12
07.11.2020 10:31
Заполните массив случайными числами в диапазоне 0..100 и подсчитайте отдельно среднее отдельно среднее значение все элементов, меньших 50, и среднее значение все...
pziipzii
17.07.2020 12:30
Объясните подробно работу этого кода на python, не особо понимаю какая команда что тут делает a = input( Введите текст с минимум двумя одинаковыми словами: )b =...
маша2750
16.04.2020 12:58
Валфавите языка планеты триумват всего три символа-0, 1 и 2. каждое слово состоит из трёх символов. какое максимальное количество слов возможно в этом языке....
Доминат
22.08.2020 12:04
Создать программу, чтобы нашло максимальное отрицательное число кратное 2. заранее...
rakitina03
09.02.2021 07:11
(-15) плюс (-2 7/10) приложите ренение к ответу...
DashaDoro03
27.10.2022 05:22
Mening settling kitobim Сочинения...
stas651
02.04.2023 12:17
Қазақ тілі 2бөлім 30бет 44жаттығулар...
ЯестьПаша
31.12.2020 02:58
Загадки по английскому про яблоко и морковку...
Yuzalina11
09.09.2021 07:19
Реши систему уравнений: ⎧⎩⎨1x+y+1x−y=103x+y+1x−y=18 ⎧⎩⎨⎪⎪⎪⎪⎪⎪⎪⎪⎪⎪x= y= (Дробь в ответе должна быть сокращённой)....
Morij007
09.09.2021 07:19
Sin(n/2+x/2)-cos(n+x)+1=0 ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n,i:integer;
p:real;
begin
readln(n);
p:=1;
for i:=1 to n do
begin
p:=p*2;
writeln(i,' ',p);
end;
end.