Re: составьте программу вычисления среднего арифметического целых чисел из отрезка [-4;15]
Re: составьте программу вычисления среднего арифметического целых чисел из отрезка [-4;15]
Гость
Ответ(ы) на вопрос:
Гостьvar i,s,k:integer; begin for i:=-4 to -15 do begin inc(s,i); inc(k) end; write('Ср арифм = ',s/k) end.
Не нашли ответ?
Похожие вопросы