Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
savkinaveronika
10.07.2020 08:13 •
Информатика
Напишите программу поиска суммы положительных нечетных чисел, меньших 100 и некратных 3.
Показать ответ
Ответ:
olga0520
07.09.2020 15:50
// PascalABC.NET 3.1, сборка 1171 от 15.02.2016
begin
Println(Range(1,99).Where(n->(Odd(n) and (n mod 3<>0))).Sum)
end.
Результат выполнения программы:
1633
0,0
(0 оценок)
Популярные вопросы: Информатика
sashgrts
07.11.2021 23:35
Ввести массив чисел определить определить номер максимального отрицательного нечетного элемента массива ПАСКАЛЬ...
krejzin
25.04.2023 01:13
Определить количество штук плитки, необходимой для ремонта пола (пол и плитка - прямоугольные). Разработать этапы решения данной задачи и прикрепить файл с решением...
kiradark15
05.09.2022 22:04
1)дан массив из 10 чисел. найти произведение отрицательных чисел.(visual basic)...
chukalina
25.03.2020 14:08
Составить алгоритм вычисления значений функции, заданной следующим образом:x, при x -1 Y=sin(x), при x -1...
света9710
28.09.2021 02:13
Представлен пример: a=float(input(O) b=float(inputO)) t=a+b print(t) Какое значение примет данный пример?152o25,4O helloоTrue...
shitova20023p02gai
05.09.2021 19:47
7. Наука, изучающая информацию и информационные процессы -A) інформатикаB) КриптоанализC) КриптографияD) КибернетикаE) КриптологияE(L...
vanschool
06.02.2020 07:40
Палиндромом называется число, которое читается одинаково слева направо и справа налево. Например: 121, 4 и 123321 — палиндромы, а 12, 2312 и 123 — нет. Выведите на...
Аркадичка
01.05.2022 07:27
Нужна ))) Заранее от души!...
172839465
14.07.2021 06:01
Перепишите текст 1, раскрывая скобки, вставляя, где это необходимо, пропущенные буквы и знаки препинания. Текст 1Ясное июньское утро. Откр..паю окно в бор. Он пр.ветству.л...
Agent1597
31.03.2021 22:41
Визначте координати точки перетину прямих, зображених на рисунку 70. Запишіть відповідну систему рівнянь, перевіртезнайдений розв язок системи, підставивши координати...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
Println(Range(1,99).Where(n->(Odd(n) and (n mod 3<>0))).Sum)
end.
Результат выполнения программы:
1633