Ввести с клавиатуры нечетное натуральное число n (25 найти сумму всех четных чисел в диапазоне от 25 до n. вывести результат на экран. желательно на языке java или pascal!
Danyka47
3
05.09.2019 23:10
5
Другие вопросы по теме Информатика
janavotkinsk
03.06.2019 11:40
Настя20767
03.06.2019 11:40
ilgam2000
03.06.2019 11:03
ronnedtoby
03.06.2019 11:50
ДвоечникТочно
03.06.2019 11:50
dashenkanosova5
03.06.2019 11:50
aitdariya
03.06.2019 10:41
heeezing
03.06.2019 11:50
handogin1999
03.06.2019 11:50
Популярные вопросы
- 2.Вкажіть, які із галузей машинобудування порівнювальних країн...
3 - Сколько потребуется дров с удельной теплотой сгорания 13*106...
3 - В треугольнике АВС угол С равен 90°, АВ=18, sin A=корень 35/6....
2 - Під час додавання в природну воду соди (Na2CO3) утворився осад...
2 - Какое из всех уравнений не имеет никакого корня? А)2(x+2)=2x+2...
1 - Task 7. Form the questions with the help ofthese words and answer...
1 - що допомагає акулам, північним оленям, фламінго орієнтуватися...
1 - Найдите значение выражения -b(b+5) + (b +6) во второй степени...
1 - Розкрий дужки і спрости вираз: −(13−a)−22 ...
3 - Напишіть рівняння реакції за схемою: Ba ⇒ ? ⇒ Ba(OH)2 ⇒ BaCO3...
2
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.