Question

Ввести с клавиатуры нечетное натуральное число N (25
Найти сумму всех четных чисел в диапазоне от 25 до N.

Вывести результат на экран.


Желательно на языке Java или Pascal!

Answer 1

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.