Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
IAlisaI
11.02.2020 18:03 •
Информатика
Ввести с клавиатуры нечетное натуральное число n (25 найти сумму всех четных чисел в диапазоне от 25 до n. вывести результат на экран. желательно на языке java или pascal!
Показать ответ
Ответ:
zarasabaka
16.08.2020 10:26
Program n1;
var n,sum,i: integer;
begin
readln(n);
sum:=0;
for i:=25 to n do if i mod 2=0 then sum:=sum+i;
write(sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
dead11dead
19.08.2020 12:19
VBA. Excel. Задан массив E(5, 5) и число а. Найти количество элементов, равных по значению а. Элементы массива из ячеек таблицы Excel. Значение a - ввод на клавиатуре...
дззззззззззззззззз
09.04.2021 04:06
Решить в s# одна из основных операций с числами – их сравнение. мы подозреваем, что вы в совершенстве владеете этой операцией и можете сравнивать любые числа, в том...
Кеса1188
10.05.2021 01:24
Х. признан виновным в том, что после убийства потерпевшего Ф от тайно похитил из его одежды сотовый телефон. Эти действия Х, суд квалифицировал по п. г ч. 2 ст.158...
69Unicorn69
10.05.2021 01:24
Вынеси общий множительбах – 12а =6 .а . ()Общий числовой множитель равен 6.Общий буквенный множитель равен а....
Hennessy777
08.06.2021 11:45
Сколько было сыновей у Владимира Мономаха?...
nekit3221
04.05.2021 09:50
составьте по 1 загадке про живой организм (животное) обитающий в организменной среде, почвенной среде, наземно-воздушной среде и водной среде. ЛЮБЫЕ...
vlad09101986
20.08.2021 08:40
10. Алюминий может прореагировать с 219 г раствора соляной кислоты с массовой долей кислоты 15%. Определите объём выделившегося водорода (н. у.). ОЧЕНЬ...
andrwy1229
12.12.2020 21:38
решить олимпиаду по физкультуре...
ЖанЖак2003
16.05.2022 04:27
Вода, ты - сама жизнь написать эссе 100-120 слов использовать предложения с обособленными обстоятельствами и дополнениями, вводные конструкции, различные типы односоставных...
ariiiiiaha
16.05.2022 04:27
1.5. Вершина якої з парабол належить осі абсцис? А) у = х2 - 4; В) y = (х – 4)2; Б) у = х2-4x; Г) y = (х – 4)2 +1....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var n,sum,i: integer;
begin
readln(n);
sum:=0;
for i:=25 to n do if i mod 2=0 then sum:=sum+i;
write(sum);
end.