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

5 lines
171 B
Ada
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
package Hailstones is
type Integer_Sequence is array(Positive range <>) of Integer;
function Create_Sequence (N : Positive) return Integer_Sequence;
end Hailstones;