Ребята, помогите пожалуйста с информатикой! Задача: СОСТАВЬТЕ ПРОГРАММУ ДЛЯ НАХОЖДЕНИЯ СРЕДНЕГО АРИФМЕТИЧЕСКОГО НЕЧЕТНЫХ ДВУЗНАЧНЫХ ЧИСЕЛ В КУМИРЕ. Вы моя последняя надежда.

var SrAr:real;s, i, k:integer;begink:=0;s:=0;for i:=10 to 99 doif i mod 2<>0 then begin s:=s+i; k:=k+1; end;SrAr:=s/k;writeln(SrAr:5:5);end.