with Ada.Text_IO; package body parhuzamos_kepernyo_kezeles is protected body Kepernyo is procedure Kiir(mit : string) is begin Ada.Text_IO.Put_Line(mit); end; end Kepernyo; end parhuzamos_kepernyo_kezeles;