free pascal case语句的格式问题（谢谢,

这种case语句要不就是赋值,要不就是将函数与赋值分开来,正确的程序是这样的：
case sum of
1:writeln('zhou');
2:writeln('zhao');
end;
writeln(1,2);
不过我建议这种条件少的判断最好还是要用if语句,if 语句的用法如下：
if sum=1 then begin
writeln('zhou');
end else if sum=2 then begin
writeln('zhao');
end;
writeln(1,2);
lz 这些全部都是我自己打的,看我这么辛苦,拜托采纳!我急缺分啊!