С помощью оператора "For" подсчитать сумму нечетных чисел в интервале от A до B.
A<B
Помогите пожалуйста
PascalABC
A<B
Помогите пожалуйста
PascalABC
More Questions From This User See All
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
Var a,b,i,s:integer;begin
readln(a,b);
s:=0;
for i:=a to b do
if i mod 2=1 then s:=s+i;
writeln('s = ',s);
end.
Пример:
5 10
s = 21