Напишите программу для решения следующей задачи. - вопрос №12141295 от shorgk 06.10.2021 09:47

Question

Информатика: Напишите программу для решения следующей задачи. Камера наблюдения регистрирует в автоматическом режиме скорость проезжающих мимо неё автомобилей, округляя значения скорости до целых чисел. Необходимо определить: 1) разность максимальной и минимальной скоростей автомобилей; 2) количество автомобилей, скорость которых не превышала 30 км/ч. Программа получает на вход число проехавших автомобилей N (1 ≤ N ≤ 30), затем указываются их скорости. Значение скорости не может быть меньше 1 и больше 300. Программа

shorgk · Answer

Program Cars;vari, n, v, max_v, min_v: integer;Begin//Ввод числа автоreadln(n);//Поиск максимальной и минимальной скоростиmax_v := 0;min_v := 300; //Берём противоположные скорости, чтобы найти максимум и минимумfor i := 1 to n dobeginread(v);if (v max_v) thenmax_v := v;if (v min_v) thenmin_v := v;end;//Вывод ответовwriteln(max_v);if (min_v 30) thenwrite( YES )elsewrite( NO );End.Подробнее - на - Объяснение:...