Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
nekit2409
08.02.2022 09:19 •
Информатика
Составить программу вывода всех натуральных чисел, меньших n.
Показать ответ
Ответ:
MadPrinter
04.10.2020 15:39
// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!
begin
Range(1,ReadInteger('n=')-1).Println
end.
Пример
n= 13
1 2 3 4 5 6 7 8 9 10 11 12
0,0
(0 оценок)
Популярные вопросы: Информатика
msnyamkina
14.10.2020 21:28
Во по паскалю( Желательно ответить подробно на во Не могу понять почему не работают одновременно типы данных: String и Integer. Взять ситуацию: var a:string; var...
анна2242
07.01.2022 18:30
Среда в желудке человека(если pH=5-6) и еще к каким видам веществ относится гипс?(растворимые, малорастворимые, нерастворимые)...
ольга1656
26.07.2020 19:02
до якої групи лексики належать слова лютоботвотворний,дериблюд пустомолот глибокоока?яка їхня роль у творі?...
AnnaVlasova09
07.11.2022 16:48
Во сколько раз масса кислорода объëма m3 больше массы водорода того же объëма?...
aeivanovakr2000
07.11.2022 16:48
По русскому языку нужно придумать 4 глагола, переделать в причастие и с ним записать предложение....
tural23
05.06.2022 15:54
Заполните таблицу правильные многогранники...
blowwwwwwww
22.02.2023 21:54
Есімді және етістікті сөз тіркестерін құрап жазыңдар...
Pipidastet
22.02.2023 21:54
1) Найди площадь параллелограмма MNKL, если длина его основания составляет 24 см, а высота, проведённая к этому основанию, равна 14 см. 2) на картинке3) Найди...
konaser03
03.10.2022 09:30
Нужно написать сочинение о своём одногруппнике примерно на 2 минуты рассказа...
DreamEvilDead
02.07.2020 13:47
Пример (1 17/18 * 1 13/14 - 1 13/15 * 1 6/49) : (3 1/12 - 1 25/36)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
Range(1,ReadInteger('n=')-1).Println
end.
Пример
n= 13
1 2 3 4 5 6 7 8 9 10 11 12