Составить прогу, которая вычисляет среднюю скорость катера по результатам измерения в

Составить прогу, которая вычисляет среднюю скорость катера по результатам измерения в 6 пт. (Задаются в массиве констант 87км/ч, 68 км/ч, 82,7 км/ч, 91 км/ч, 86 км/ч, 67,5 км/ч). Составьте, пожалуйста, буду очень благодарен.

Задать свой вопрос
1 ответ
Begin readarrreal(6).Average.ToString.Println; end.

"Школьный вариант":

const
  N = 6;

 var
  i: integer;
  ar: array[1..N]of real;
  s: real;

 begin
  s := 0;
  for i := 1 to N do
   begin
    read(ar[i]);
    s := s + ar[i];
  end;
  write(s / 6);
end.
Костян Айнбунд
Мне бы массивом, пожалуйста
Sashok Frsanjanc
ar - это и есть массив...
Кира Сагура
А нет вариантов попроще?)
Семён Прокойченко
Я ещё не знаком с этим
Александр
Есть вариант посложнее.
Дима Марикин
Давайте)
Творус Егор
Спасибо громадное
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт