< >

Дан рост трех друзей. Как написать программу которая определяет их среднийрост на языке PascalABC?

Ответы

Ответ дал: sinbad7
0

var

a,b,c:real;

begin

readln(a,b,c);

writeln((a+b+c)/3);

end.

Похожие вопросы
Русский язык
2 года назад
Зачеркни лишнее слово 1.Гром, громадный,громкость, громкий;  2.Выспаться, сыпучий, сыпь, сыпать; 3.Жалость, жалоба, жалкий, жалить; 4.Легонько, лекговый, залегать, облегчать
Русский язык
2 года назад
Правописание Н и НН в причастиях и отглагольных прилагательных   Растерян..ый человек, мочен..ые яблоки, брошен..ый мяч, стрижен..ый по-мальчишески, книга иллюстрирован..а, завещан..ый, желан..ый,
Геометрия
7 лет назад
Дано треугольник ABC. Найдите точку M такую, чтобы в четырехугольник ABCM можно было вписать окружность и описать окружность вокруг него.
Математика
7 лет назад
помогите пожалуйста, желательно с обьяснением
Математика
10 лет назад
Задача 11 Длина дорожки АD - 15 м. На ней обозначены точки В и С. АС = 7 м, ВD = 10 м. Вычислите длину ВС.   Варианты ответа: А: 1 м Б: 2 м В: 3 м Г: 4 м Д: 5 м
Алгебра
10 лет назад
(43-s)*17=289 решите уравнение
Обществознание
10 лет назад
На примере какого-либо политического процесса в России охарактеризуйте его структурные элементы и стадии.
Математика
10 лет назад
запишите  в  виде  процентов    десятичный  дроби: 6,51= 2,3= 0,095= запишите  в  виде  десятичной  дроби 42 % 8 % 7,25 % 568% ВЫПОЛНИТЕ ДЕЙСТВИЯ (3,8*1,75/0,95-1,02)/2,3+0,4= с  кратцие  срочно