//PascalABC.NET var b : array of integer; m : integer; begin // Ввод данных var n := ReadInteger('Введите число N всех чисел массива: '); var k := ReadInteger('Введите число К "красивых" чисел: '); writeln('Введите все числа в массиве'); var a := ReadArrInteger(n); // Резервируем место для слагаемых b := new integer[k]; // Просмотрим все данные числа foreach var i in a do // Выберем только кратные трем if i mod 3 = 0 then begin // Если есть свободное место, поместим туда m := b.FindIndex(x -> x=0); if m <> -1 then b[m] := i else // Если свободного места нет, найдем наибольший элемент // и заменим его begin m := b.FindIndex(x -> (x>i) and (x=b.Max)); if m <> -1 then b[m] := i; end; end; // Выведем сумму write('Сумма элементов - ', b.Sum) end.
LinuxTux (Такс) — официальный талисман Linux. Созданный в 1996 Ларри Юингом, это толстый пингвин, выглядящий сытым и довольным. Идею использовать пингвина в качестве талисмана Linux выдвинул создатель этого ядра Линус Торвальдс. Tux был нарисован для соревнования логотипов Linux. Победивший логотип при свободного графического редактора GIMP нарисовал Ларри Юинг.Сегодня Tux — общепризнанный символ сообществ сторонников Linux и СПО. Он намного более известен, чем, например, логотип проекта GNU. Внешний вид пингвина разнится от картинки к картинке: например, в версии для пакета повышения безопасности PaX, пингвин носит шлем, щит, а также держит в лапе лабрис — и имеет демонический вид с красными глазами. 
Привет что пытаешься разгадать загадку на шоколадку. Первый этап пройден. На втором ждет тебя кое что интересное...
f761992017032cef5e47fd89044b9c053186adbbeff59f8ad362ecf8a91d4bb8
Объяснение: Это было зашифрованно в MD5