Найти произведения чисел из отрезка (10; 40) которые делаятся на 5. информатика написать программу в паскале

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
  Print(Range(10,40,5).Aggregate(1.0,(p,i)->p*i))
end.

Результат:
3150000000