Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Daya98888888
28.04.2022 13:06 •
Информатика
Составьте программу вычисления суммы: 5+7+9+11+…+101
Показать ответ
Ответ:
korekhova1986super
13.07.2020 21:00
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 оценок)
Популярные вопросы: Информатика
nastyabel72
19.11.2022 23:32
Пусть x=1, y=2.Каков будет результат кода:x=y y=x print(x,y)(точно не 2,2)...
Miss4455
24.03.2021 14:16
Складіть прилавок в пайтоні....
OlyaMonokova
21.03.2021 03:52
Какие бывают данные: текстовые и т.д....
друг100
21.03.2021 03:52
Дан целочисленный массив из 40 элементов элементы массива могут принимать целые значения от 0 до 10000 включительно позволяющий найти и вывести наименьший из элементов...
anna1866
01.04.2020 17:24
Натуральные числа записываются с буквенных последовательностей по следующему правилу: числам 1, 2, 3 и 4 ставятся в соответствие буквы ь, э, ю и я. последующим 16 числам...
arseniyyuldash
23.06.2022 22:43
Дан двумерный массив. замените все числа по главной диагонали на 5. паскаль...
wwwwwww6
10.04.2020 08:52
Рыболов на вопрос, какова масса пойманной рыбы, ответил: «Масса хвоста 1 кг, масса головы составляет столько, сколько хвост...
nikitossmile1
12.11.2021 21:53
Найти главные члены предложения следующего предложения. страница книги - это огромный экран, который и не снился самому лучшему телевизору. ...
егор1486
10.04.2020 08:52
Приехали 100 туристов. Из них 10 туристов не знают ни немецкого языка, ни французского. 75 туристов знают немецкий, 83...
pervushinapolina
10.04.2020 08:52
В трех ящиках 300 кг апельсинов. Масса апельсинов первого ящика составляет половину массы апельсинов второго ящика и треть массы...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
i,sum:Integer;
Begin
for i:=5 to 101 do
begin
if (i mod 2 <> 0) sum:=sum+i;
end;
Writeln(sum);
end.