Вопрос Помогите написать программу в Turbo Pascal

[famatik]

Нужно вычислить среднее арифметическое чисел, значение которых находится в интервале от 3 до 10.

 

[ЗеК]

Очевидно, что среднее арифметическое бесконечного количества чисел, находящегося в этом диапазоне, будет 6.5. Вычислить это на компьютере невозможно, поскольку он является конечным автоматом. Так что или меняй условие, или это программа в одну строчку.

 

[rappeople]

sa := (3 + 10) / 2;