uses crt;
var i,sum,k: integer;
begin
sum: =0;
k: =0;
writeln('вводите числа. 0 - конец последовательности');
repeat
read(i);
if i mod 2=1 then begin
sum: =sum+i;
inc(k);
end;
until i=0;
writeln;
writeln('среднее арифметическое нечетных чисел: ',sum/k: 5: 3);
end.
Қарастырылып отырған құбылыс немесе процесс абстрактылық нысандар мен математикалық заңдылықтар түрінде берілетін модель математикалық модель деп аталады.Модельдің екінші туріне – нысандардың, процестер мен құбылыстардың ауызша (қандай да бір тілдің көмегімен) суреттелуі, сипатталуы жатады. Үшінші түрі–ақпараттық-логикалық модель, ауызша сипатталған нысанды кескіндеп көрсету (формалау). Төртінші түрі – динамиканың ішкі заңдарын, өзара әсерін, қасиеттерін көрсететін физикалық нысандардың, құбылыстар мен процестердің математикалық түрде сипатталуы.