-- "Hello, Bitcoin!" #24/25 in Ada

with Text_IO;
procedure Hello_Bitcoin is

begin
  Text_IO.Put_Line("Hello, Bitcoin!");
end Hello_Bitcoin;