Задано два целых числа а и в найдите сумму ничетных чиселот а до в

Если числа нечётные, то их сумма будет чётной. смотрите: ( 2n+1)+(2n+1)=4n+2. соответственно если 3+9=12 (чётное) и с  другими примерами аналогично.

      x      y      v  true  true false  true false  true  false  true  true  false false  true       x      y      v  true  true  true  true false false  false  true  true  false false  true var x,y,v: boolean; beginwrite('x': 6, 'y': 6, 'v': 6); writeln; for x: =true downto false do beginfor y: =true downto false do beginv: = y and (not x)or (not y); writeln(x: 6,y: 6,v: 6); end; end; writeln; writeln; writeln; write('x': 6, 'y': 6, 'v': 6); writeln; for x: =true downto false do beginfor y: =true downto false do beginv: = (not y) and (not x)or y; writeln(x: 6,y: 6,v: 6); end; end; end.

// pascalabc.net 3.3, сборка 1634 от 14.02.2018 // внимание! если программа не работает, обновите версию! begin   writeln('*** исходная матрица ***');   var a: =matrrandom(4,3,-10,10);   a.println(4); writeln(4*a.colcount*'-');   var s: =a.elementsbyrow;   writeln('min=',s.min,', max=',s.max) end. пример *** исходная матрица ***   -10 -10  -9   -8  -2  -2   -1  -2  -5   -6    6  -5 min=-10, max=6