Pascal - inserire in un programma un file .pas

ecco il mio problema ? questo

io ho diversi programmi che stavo riunendo in uno solo...
Per? viene una cosa assurda quindi li volevo collegare soltanto...

ESEMPIO STUPIDO BANALIZZANDO (non ? proprio il mio caso ma i concetto ? quelo)

Se io ho
-"somma.pas";
-"prodotto.pas";
-"programmaprincipale.pas";

come faccio da programma principale a far eseguire somma.pas e prodotto.pas?

tipo:
WriteLn('premi:');
WriteLn(' s per somma');
WriteLn('p per prodotto');
ReadLn(s);
case s of
's': ?!?
'p': ?!?

[sul mio libro di info nn c'?.......]

Beh, io ti consiglio di mettere i programmi come function o procedure!

? quello che ho fatto ma poi ? un casino (vine MOLTO lungo)...

Vabb? riporvo su google.. vi far? sapere se trovo qlc...

Prova seguendo questo esempio (non l'ho provato)

Program esecuzione;
{$M 00,0,0 } { 16K stack, no heap }
uses Dos;
var
ProgramName, CmdLine: string;
begin
Write('Programma da eseguire (path completo): ');
ReadLn(ProgramName);
Write('Parametri da passare a ',
ProgramName, ': ');
ReadLn(CmdLine);
WriteLn('Esecuzione...');
SwapVectors;
Exec(ProgramName, CmdLine);
SwapVectors;
WriteLn('...tornato dall''esecuzione!');
if DosError <> 0 then { Errori? }
WriteLn('Errore Dos N?', DosError)
else
WriteLn('Eseguito con successo. ',
'Exit-code del processo figlio = ',
DosExitCode);
end.


La funzione sarebbe:
procedure Exec(Path, CmdLine: String);

Comunque s? funziona...

L'ho modificato togliendo la parte per i parametri da passare perch? se no (nn so come mai) non andava..

Se a qlc nteressa attenzione che nlla path si inserisce ovviamnte il programma gi? compilato e non i file .pas

Grazie mille....

Ora devo sistemare un po di cose...

Io passerei dalle unit, ? la cosa migliore secondo me