{
Online Pascal Compiler.
Code, Compile, Run and Debug Pascal program online.
Write your code in this editor and press "Run" button to execute it.
}
program Hello;
var
greetings : string;
procedure ReturnSometext(str : string; var result : string);
begin
result := 'Hello, ' + str;
end;
begin
ReturnSomeText('AlexP', greetings);
writeln(greetings);
end.