Найти сумму нечетных чисел от 11 до 19.
var i, sum: integer; begin for i := 11 to 19 do if(i mod 2 <> 0) then sum := sum + i; writeln(sum); end.
11+13+15+17+19=75 Сумма нечетнх, думаю что так.