Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
mrjuck
10.04.2023 06:25 •
Информатика
Напишите программу вывода нечетных чисел от 1 до n
Показать ответ
Ответ:
maksimkasuslov1
05.10.2020 14:01
Program n1;
var n,i: integer;
begin
readln(n);
for i:=1 to n do if i mod 2<>0 then write(i,' ');
end.
0,0
(0 оценок)
Ответ:
89286666666
05.10.2020 14:01
// PascalABC.NET 3.2, сборка 1385 от 14.02.2017
begin
var n:=ReadInteger('n=');
Range(1,n,2).Println
end.
Пример
n= 58
1 3 5 7 9 11 13 15 17 19 21 23 25 27 29 31 33 35 37 39 41 43 45 47 49 51 53 55 57
0,0
(0 оценок)
Популярные вопросы: Информатика
leeJLZeel
11.10.2021 02:25
1)Радиус шара измерили с точностью 0,01 см и получили 3,42. Задача рассчитать объем с учетом точности и вывести ответ, оставив нужное количество значащих чисел. 2)С...
adelina121212
16.01.2023 23:09
Переведите целое десятичное число 151 в двоичную систему счисления: а) делением на 2; б) по схеме n10 n8 n2 в) по схеме n10 n16 n2...
joker902
22.02.2020 04:01
Программисты, кто знает как удалить поиска в загрузках мой компьютер...
6603673
02.09.2021 03:03
Для некоторой подсети используется маска 255.255.252.0. сколько различных адресов компьютеров допускает эта маска? на практике два из возможных адресов не используются...
tkalenko03
07.04.2021 20:55
На пограничном контроле в стране n рано утром работали всего три пограничника. первому пограничнику нужно 5 минут чтобы проверить паспорт, второму 6 минут, третьему...
lam3r
07.04.2021 20:55
Python. напишите программу, которая переставляет соседние элементы массива: 1-й со 2-м, 3-й с 4-м и т.д. нумерация элементов начинается с единицы. входные данные первая...
Mtaraska
16.11.2021 16:52
известны год, номер месяца и день рождения человека, а также год, номер месяца и день сегодняшнего дня. определите возраст человека (число полных лет). гарантируется,...
228pfxt
16.11.2021 16:52
Please алгоритм, можно в pascal дан массив {x} размерностью n. требуется: превратить его так, чтобы в начале массива находились отрицательные элементы в порядке их...
freks2
16.11.2021 16:52
Впаскале дан массив {x} размерностью n. требуется: превратить его так, чтобы в начале массива находились отрицательные элементы в порядке их прохождения в исходном...
dasssshka1
20.07.2021 18:57
Технология печати струйного принтера...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n,i: integer;
begin
readln(n);
for i:=1 to n do if i mod 2<>0 then write(i,' ');
end.
begin
var n:=ReadInteger('n=');
Range(1,n,2).Println
end.
Пример
n= 58
1 3 5 7 9 11 13 15 17 19 21 23 25 27 29 31 33 35 37 39 41 43 45 47 49 51 53 55 57