Пожалуйста. Напишите программу для решения следующей задачи. Камера наблюдения...

+841 голосов
5.6m просмотров

Пожалуйста. Напишите программу для решения следующей задачи. Камера наблюдения регистрирует в автоматическом режиме скорость проезжающих мимо неё автомобилей, округляя значения скорости до целых чисел. Необходимо определить среднюю зарегистрированную скорость всех автомобилей. Если скорость хотя бы одного автомобиля была не меньше 60 км/ч, выведите «YES», иначе выведите «N0». Программа получает на вход число проехавших автомобилей N (1 =< N =< 30), затем указываются их скорости. Значение скорости не может быть меньше 1 и больше 300. Программа должна сначала вывести среднюю скорость, затем «YES» или «N0».​


Информатика (129 баллов) | 5.6m просмотров
Дан 1 ответ
+50 голосов
Правильный ответ

Ответ:

  • begin
  • var a := ReadArrInteger(ReadInteger('N:'));
  • Println('Средняя скорость:', a.Average);
  • Println('Была ли не меньше 60 км/ч:', a.Max > 60 ? 'YES' : 'NO');
  • end.

Примеры работ:


image
image
(3.7k баллов)
+154

а через кумир? пожалуйста