Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
anilin2002
27.08.2021 14:19 •
Информатика
Паскаль.вывести массив из нечетных чисел от 1 до 223 и вычислить их сумму.
Ответ:
sock2
05.10.2020 16:37
// PascalABC.NET 3.2, сборка 1387 от 20.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Сумма равна ',Range(1,223,2).Println.Sum)
end.
Результат
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 59 61 63 65 67 69 71 73 75 77 79 81 83 85 87 89 91 93 95 97 99 101 103 105 107 109 111 113 115 117 119 121 123 125 127 129 131 133 135 137 139 141 143 145 147 149 151 153 155 157 159 161 163 165 167 169 171 173 175 177 179 181 183 185 187 189 191 193 195 197 199 201 203 205 207 209 211 213 215 217 219 221 223
Сумма равна 12544
0,0
(0 оценок)
Популярные вопросы: Информатика
madinatrtyakov
07.05.2022 18:03
Какова мощность пересечения множеств? m={1,2,7,9} и n={1,5,9,11} будет 9 или я что-то не так понимаю?...
elfimovakd
02.02.2023 01:00
Аркадий, виталий и савелий писали контрольную работу на тему эпителий . учитель биологии проверил работы, но сгоряча сжёг их во время эксперимента. ученикам же он...
Alinalina080206
10.06.2021 06:56
Какой вид диаграммы не имеет вертикальной и горизонтальной осей? выберите один ответ: круговая с областями точечная...
VasiliyLihasdb
11.02.2021 05:30
Носители информации в порядке их появления...
Anas11111
18.08.2020 18:19
Для того щоб додати автоматичну нумерацію сторінок документа потрібно скористатися пунктом позначеними цифрою А) 2Б)1В)3...
mani09091
15.02.2022 02:12
Решите . ! 1. в зоне wi-fi у троих были iphone, планшет и мобильный телефон. смогут ли они поиграть друг с другом в сетевую игру minecraft? варианты ответов: 1) да,...
daniilkomarov
15.02.2022 02:12
Имеется кусок ткани длиной m метров. от него последовательно отрезаются куски разной длины. все данные заносятся на компьютер. компьютер должен выдать сообщение о...
Улька9Пулька
15.02.2022 02:12
Впаскаль. 1) напечатайте все двухзначные числа, которые кратные 5 и не кратные 3....
trollolo740
19.02.2023 21:50
Бублик режут на сектора.сделали 10 разрезов.сколько получилось кусков?...
putnikputen
19.02.2023 21:50
Как информатика связанна с эвм? поколения эвм? в каких отраслях труд человека целесообразнее заменить трудом эвм? существует ли связь между информатикой кибернетикой?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('Сумма равна ',Range(1,223,2).Println.Sum)
end.
Результат
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 59 61 63 65 67 69 71 73 75 77 79 81 83 85 87 89 91 93 95 97 99 101 103 105 107 109 111 113 115 117 119 121 123 125 127 129 131 133 135 137 139 141 143 145 147 149 151 153 155 157 159 161 163 165 167 169 171 173 175 177 179 181 183 185 187 189 191 193 195 197 199 201 203 205 207 209 211 213 215 217 219 221 223
Сумма равна 12544