Instrucţiunea CASE este o instrucţiune alternativă multiplă care permite selectarea unei instrucţiuni dintr-o listă de instrucţiuni marcate, în funcţie de valoarea unui selector.
Instrucţiunea case are două forme:
Instrucţiunea case are două forme:
1)CASE expresie de tip ordinal OF
Listă de constante1: instrucţiune1;
Listă de constante2: instrucţiune2;
.......................................................
Listă de constanten: instrucţiunen;
end;
Listă de constante1: instrucţiune1;
Listă de constante2: instrucţiune2;
.......................................................
Listă de constanten: instrucţiunen;
end;
2)CASE expresie de tip ordinal OF
Listă de constante1: instrucţiune1;
Listă de constante2: instrucţiune2;
.......................................................
Listă de constanten: instrucţiunen
ELSE instrucţiune(n+1)
end;
Listă de constante1: instrucţiune1;
Listă de constante2: instrucţiune2;
.......................................................
Listă de constanten: instrucţiunen
ELSE instrucţiune(n+1)
end;
Atenţie: în cazul folosirii acestei sintaxe, semnul " ; " (punct şi virgula) inainte de "else" este strict interzis;
"instructiune1", "instructiune2" şi "instructiunen" sunt instrucţiuni Pascal.
"instructiune1", "instructiune2" şi "instructiunen" sunt instrucţiuni Pascal.
Principiul de execuţie:
· se evaluează expresia de tip ordinal (integer, char, Boolean,byte,word,longint, sau definită de utilizator ca subdomeniu sau enumerare);
