Например в Memo будет написано:

Program D;
uses crt;

var i:byte;

procedure entr;
begin
writeln;
writeln('Для продолжения нажмите Enter.');
readln;
end;

Begin
for i:=1 to 10 do
entr;
end;

И программа должна выпонить действие (написанное на языке Pascal) описанное в Memo.
Please help.