Посчитать средний рост учеников (массивом)

@прпрпрп · Регистрация: 24.02.2016

Author24 — интернет-сервис помощи студентам

Подсчитать средний рост учеников в классе с помощью массива. Кол-во учеников 14.

@Cyborg Drone · 06.03.2016, 17:53

Pascal

const m = 14;
var i: integer;
    r: array [1..m] of real;
    s: real;
begin
  s := 0;
  for i := 1 to m do
    begin
      write('Рост ', i, ' ученика = ');
      readln(r[i]);
      s := s + r[i]
    end;
  write('Средний рост = ', s / m:0:2)
end.

И зачем здесь массив...

@прпрпрп 0 / 0 / 0 Регистрация: 24.02.2016 Сообщений: 11
		1
	Посчитать средний рост учеников (массивом) 06.03.2016, 11:21. Показов 2995. Ответов 1 Метки нет (Все метки) Подсчитать средний рост учеников в классе с помощью массива. Кол-во учеников 14. 0

	06.03.2016, 17:53

Посчитать средний рост учеников (массивом)

Решение