What is the code for creating a menu on pascal?

Answer 1

Well if you want to create a menu, you may use CASE.

This is the program

program Menu;

var menu:integer;

begin

writeln('Menu');

writeln('1. XXXXXXX');

writeln('2. XXXXXXX'); {unlimited option you want}

writeln; {just to make it pretty :)}

write('Mode you want to choose');

readln(menu);

CASE menu OF

1: {program if I choose 1 from the menu};

2: {program if I choose 2 from the menu};

end; {end of case}

readln;

end.