eeeehh...magari a capire in concreto quello che mi scrivi
è troppo poco che studio Pascal e non ho chiaro come richiamare procedure sotto altre, se ti faccio un esempio breve me lo puoi mettere per iscritto con la sintassi giusta per le condizioni di chiamata?
PROGRAM breve_avv;
var
a : integer
PROCEDURE I;
BEGIN
writeln ('Sei in un bosco sperduto, ci sono due sentieri');
writeln ('se segui quello di destra digita 2');
writeln ('se segui quello di sinistra digita 3);
END;
PROCEDURE II;
BEGIN
writeln ('nel sentiero di destra c'è una Panda');
writeln ('se vuoi trafugare lo stereo della Panda, digita 4');
writeln ('se vuoi tornare al bivio digita 1);
END;
PROCEDURE III;
BEGIN
writeln ('sei arrivato in edicola');
writeln ('se compri la gazzetta, digita 5');
writeln ('se vuoi tornare al bivio, digita 1);
END;
BEGIN
I;
read (a);
if a=2
then II;
if a=3
then III;
readln;
readln;
END.
se voglio continuare così per 150 paragrafi (quindi 150 procedure), dove e soprattutto come devo usare la sintassi if then else?