with Ada.Text_IO;
procedure Idatzi_Katea (S : in String) is
   -- Aurrebaldintza:
   --    S (karaktere-katea)
   -- Postbaldintza:
   --    G = <S> (G irteera estandarra da)
   --    Oharra: S idatzi eta lerro-jauzia egiten da
begin
   Ada.Text_IO.Put_Line (S);
end Idatzi_Katea;
