// PascalABC.NET 3.4.2, сборка 1790 от 15.09.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a := ArrRandom(ReadInteger('n='), 1, 100); a.Println; // общее
Println('Максимальный четный ', a.Where(t -> t.IsEven).Max); // задача 1
Print('Второй минимальнывй нечетный'); // задача 2
a.Where(t -> t.IsOdd).OrderDescending.Skip(1).Take(1).Println // задача 2
end.
Пример
n= 15
67 8 60 1 96 40 73 25 39 93 64 89 40 69 9
Максимальный четный 96
Второй минимальнывй нечетный 89
основанием системы счисления называется количество разных знаков либо символов, которые используются для изображения цифр в этой системе. основанием принимают всякое натуральное число — 2, 3, 4, 16 и т.д. то есть, существует безграничное множество позиционных систем. например для десятичной
системы основание равно 10. база системы — это последовательность цифр, используемых для записи числа. ни в одной системе нет цифры, равной основанию системы. как можно догадаться, сколько есть чисел, столько же может быть и оснований систем счисления. но используются только самые удобные основания
систем счисления.
