Помогите пожалуста
1.В последовательности чисел натуральных найти количество чисел кратных трем
2.В последовательности натуральных чисел найти четные числа заканчиваются на 4

efer

1) begin  var a := ArrRandom(20, 1, 100);  a.Println();  writeln(a.Where(x -> x mod 3 = 0).Count);end.2)begin  var a := ArrRandom(20, 1, 100);  a.Println();  writeln(a.Where(x -> (x mod 2 = 0) and (x mod 10 = 4)));end.