Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
ali6619
30.12.2021 12:08 •
Другие предметы
Имеются два газа, взятые при одинаковых условиях: 10 л метана СН4 и 20 л хлора С12. В каком из них содержится больше молекул, а в каком
Ответ:
Gegobadi
06.06.2020 10:40
Var
i,sum:Integer;
Begin
for i:=5 to 101 do
begin
if (i mod 2 <> 0) sum:=sum+i;
end;
Writeln(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
Элеонора335564
24.06.2022 02:55
Что нужно сделать при получении подозрительного сообщения электронной почты?...
roman81rudi
24.06.2022 02:55
Меха каких животных ценятся больше всего в подземном царстве. Черная курица или подземные жители...
kasha13
24.06.2022 02:55
Заполните таблицу «Признаки тоталитаризма в Италии»...
dilnaz7771
24.06.2022 02:55
Заполните таблицу «Международные конференции 1920-х гг.» (Место проведения, Страны-участницы, Итоги)...
mamarika2001
24.06.2022 02:55
Таблица Раскол в испанском обществе (левый и правый лагерь)...
Deniza06
24.06.2022 02:55
Вы случайно прочитали пароль, который оставил на бумажке ваш друг на компьютерном столе. Как вы должны поступить?...
ivan240620058p0bydq
24.06.2022 02:55
Тебе очень понравился знакомый из Интернета. Он предлагает тебе с ним встретиться, чтобы пообщаться по-настоящему,...
gundinamaria
24.06.2022 02:55
На твой электронный адрес пришли фото недостойного содержания. Ты......
ksenia87109r675
24.06.2022 02:55
Что необходимо помнить, регистрируясь в Интернете?...
DANIIL12317
24.06.2022 02:55
В каких случаях можно, не опасаясь последствий, сообщить в Интернете свой номер телефона или домашний адрес?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i,sum:Integer;
Begin
for i:=5 to 101 do
begin
if (i mod 2 <> 0) sum:=sum+i;
end;
Writeln(sum);
end.