case Inputchar of
‘A’.. ‘Z’,
‘a’.. ‘z’: processAlpha(Inputchar);
‘ ‘: processSpace(Inputchar);
‘,’,
‘.’,
‘:’,
‘!’,
‘?’: processPunctuation(Inputchar);
‘0’.. ‘9’: processDigit(Inputchar);
‘+’,
‘=‘: processMathsymbol(Inputchar);
else processError(Inputchar)
end
Pascal 3.13 1.97 37%
C 5.17 3.47 33%
: 78 17 5
ABC
if A&&!C A&&B&&C
Class=1;
else if((B&&!A))!!(A&&C&&!B))
Class=2;