Кто в паскале разбирается Найти сколько чисел, введенных с клавиатуры пользователем оканчиваются на 3 (количество чисел, которые ввел пользователь

Question

Информатика: Кто в паскале разбирается Найти сколько чисел, введенных с клавиатуры пользователем оканчиваются на 3 (количество чисел, которые ввел пользователь известно) 2) Найти произведение чисел, введенных с клавиатуры, которые кратны 3 и оканчиваются на 9 (количество чисел, которые ввел пользователь известно) 3) Камера наблюдения регистрирует режим скорости проезжающих мимо нее машин. Найти максимальную зарегистрированную скорость автомобиля. Если скорость хотя бы одного автомобиля была меньше 40 км в час,

crystalrain · Answer

Задание 1:begin var a := ReadArrInteger(ReadInteger( N: )); Println( ответ: ,a.Count(x- x mod 10 = 3)); end.Задание 2:begin var a := ReadArrInteger(ReadInteger( N: )); Println( ответ: ,a.Where(x- (x mod 3 = 0) and (x mod 10 = 9)).Product); end.Задание 3:begin var a := ReadArrInteger(ReadInteger( N: )); Println( Максимальная скорость: , a.Max); Println( Была ли меньше 40км/ч: , a.Min 40 ? Да : Нет ); end.Примеры работ:...

Популярные вопросы