Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
ЕНОТ55115
14.06.2022 17:00 •
Информатика
Найти среднее арифметическое чисел от
1 до 100, кратных 3.
Показать ответ
Ответ:
Pro2222
12.08.2020 22:26
// PascalABC.NET 3.6.3
begin
(1..100).Where(p -> p mod 3 = 0).Average.Print
end.
ответ: 51
0,0
(0 оценок)
Популярные вопросы: Информатика
gregsorvenkov
21.06.2021 02:23
Напишите программу вычисления выражения, используя процедуру: s=x^3+x^5+x^n, где x и n вводятся с клавиатуры....
narik2222
21.05.2023 14:15
Завдання. Створіть інформаційну модель для вивчення вимірювальних приладів на уроках фізики. Зобразіть на форматі А4 структурну модель для вивчення вимірювальних приладів....
89533807722qoznnn7
25.02.2020 12:26
Какое из этих устройств относится к устройствам вывода графической информации?...
vvvtalik3
20.04.2021 07:51
Во сколько раз увеличится число 10,12 при переносе запятой на один знак вправо?...
bili0909
20.04.2021 07:51
Сообщение на любую тему про интернет...
Pon4ik11119999
04.02.2023 03:11
Сколько бит информации несет двузначное число восьмеричной системы исчисления...
enterways
28.12.2021 15:50
Обчислити значения виразу (2*х+у) / (2*х-у), же х і у - довільні числа ...
nikdelordp08m0z
09.11.2022 09:33
Решить по )) желательно с решением.. 1. какую молярную массу имеет соединение, если 3 моля его составляют 264г? 2. сколько молекул содержится в 4 молях кислорода? 3. сколько...
Maria2006qwerty
03.11.2020 00:17
Яку кількість теплоти необхідно передати воді масою 10кг, узятій за температури кипіння, щоб перетворити її на пару?...
TkAl06
03.11.2020 00:17
Минусы промышленного переворота в буквально 2-3 примера...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// PascalABC.NET 3.6.3
begin
(1..100).Where(p -> p mod 3 = 0).Average.Print
end.
ответ: 51