Дан целочисленный массив из 20 элементов. Элементы массива
могут принимать целые значения от 0 до 10000 включительно. Опишите на
естественном языке или на одном из языков программирования алгоритм,
позволяющий найти и вывести минимальное значение среди двузначных
четных элементов массива. Если в исходном массиве нет заданного элемента,
то вывести сообщение «Не найдено».
Ответы
Ответ дал:
0
// PascalABC.NET 3.1, сборка 1201 от 18.03.2016
begin
var a:=ReadArrInteger(20);
var b:=a.Where(x->x in [10..99]).Where(x->x.IsEven);
if b.Count>0 then Writeln(b.Min)
else Writeln('Не найдено');
end.
Тестовое решение:
7497 9647 3684 848 6349 37 1281 3739 465 7784 16 406 6936 621 4960 98 1894 3825 3369 6566
16
begin
var a:=ReadArrInteger(20);
var b:=a.Where(x->x in [10..99]).Where(x->x.IsEven);
if b.Count>0 then Writeln(b.Min)
else Writeln('Не найдено');
end.
Тестовое решение:
7497 9647 3684 848 6349 37 1281 3739 465 7784 16 406 6936 621 4960 98 1894 3825 3369 6566
16
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад
8 лет назад
9 лет назад
9 лет назад