package Szimulacio.Segedmuveletek is pragma Pure; -- A parameterul kapott Stringbe (Mibe) az elejetol kezdve belemasolja a Mit erteket -- peldak: Mibe Mit -- "abcde" "123" => "123de" -- "abc" "12345" => "123" procedure Stringbe_Masol(Mibe : in out String; Mit : String); end Szimulacio.Segedmuveletek;