1 - b, 2 - a, 3 - d, 4 - f, 5 - c, 6 - e.
Короче как-то так, будут вопросы пиши в ЛС)
<em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(12,0,40); a.Println;
a.Where(t->t.IsEven).Println
end.
<u>Пример</u>
19 22 12 20 39 31 23 9 32 7 2 10
22 12 20 32 2 10
Это ссылка из которой не возращаються
Из книг из интернета от людей.