RosettaCodeData/Task/Hailstone-sequence/Ada/hailstone-sequence-2.ada

5 lines
171 B
Ada
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
package Hailstones is
type Integer_Sequence is array(Positive range <>) of Integer;
function Create_Sequence (N : Positive) return Integer_Sequence;
end Hailstones;