Есть программисты? составить алгоритм и программу, : заполнить массив с(34) случайными числами до 38.найти произведение чисел кратных 5. распечатать массив в строку.

// PascalABC.NET 3.0, сборка 1088
begin
  var a:=ArrRandom(35,1,38);
  a.PrintLn;
  Writeln(a.Where(x->x mod 5=0).Aggregate((x,y)->x*y))
end.

Тестовое решение:
35 1 3 3 1 19 31 38 31 32 33 10 7 22 21 1 18 17 19 32 21 18 31 30 10 2 23 34 33 23 12 25 12 5 30
393750000

Вот в этом файле все написано