По м о г и т е, п о ж а л у й с т а! 1) с датчика случайных чисел получить 15 вещественных чисел n (38

1)
begin
var a:=ArrRandomReal(15,38,39);
a.Println;
end.

2)
begin
  var a := ArrRandom(20, 0, 5);
  Writeln('Последовательность ');
  a.Println;
  Writeln('Нечетные ');
  a.Where(x -> odd(x)).Println;
end.