Даны два целых числа a и b причем b больше a. найти сумму всех нечетных чисел больших a, но меньших b

angelina436 angelina436    3   19.06.2019 07:10    0

Ответы
annaglukhikh07 annaglukhikh07  15.07.2020 16:47
Var
s,i,a,b:integer;
begin
writeln('введите a и b');
readln(a,b);
s:=0;
for i:=a+1 to b-1 do
if (i mod 2<>0) then s:=s+i;
writeln(s);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика