COUNTRY_JAPAN
);
type OUTPUT is
(
OUTPUT_INVALID
OUTPUT_SCREEN
OUTPUT_PRINTER
OUTPUT_FILE
);
: 1 2
3 :
:
if ChosenColor = COLOR_RED
if ChosenColor = 1
Pascal
COLOR_REDCOLOR_BLUE COLOR_GREEN Output=COLOR_RED
COLOR=COUNTRY_ENGLAND
COLOR COLOR COLOR_RED COLOR_BLUE COLOR_GREEN
1
2 3 1 2 3
True False
False
success
Warning FatalError True False
if case , case
else
case (ScreenColor)
ColorRed: ...
ColorGreen:
ColorBlue:
else