// PascalABC.NET 3.7.2
// Да, именно так выглядит pascal.net.
function MinMax<T>(source: Array of T): (T, T);
where T: System.IComparable<T>;
begin
var max := source.First();
var min := source.First();
foreach var item:T in source do begin
if item.CompareTo(max) > 0 then max := item
else if item.CompareTo(min) < 0 then min := item
end;
Result := (min, max);
end;
begin
var src := ArrRandom();
src.PrintLn;
var (min, max) := MinMax(src);
PrintLn(string.Format('Min, max values of source array is {0}, {1}', min, max));
end.
Объяснение:
постфикс .net указывает на то, что язык имеет поддержку платформы MS.NET. Решение выполнено средствами платформы MS.NET и среды PascalABC.NET 3.7.2
В терминологии сетей TCP/IP маской сети называется двоичное число, определяющее, какая часть IP-адреса узла сети относится к адресу сети, а какая – к адресу самого узла в этой сети. Обычно маска записывается по тем же правилам, что и IP-адрес. Адрес сети получается в результате применения поразрядной конъюнкции к заданному IP-адресу узла и маске. По заданным IP-адресу узла и маске определите адрес сети.
IP-адрес узла: 217.19.128.131
Маска: 255.255.192.0
При записи ответа выберите из приведённых в таблице чисел четыре элемента IP-адреса сети и запишите в нужном порядке соответствующие им буквы, без использования точек.
