小编pet*_*tie的帖子

所以我正在使用 pascal，并且我想向一种情况添加多个语句。我尝试了这段代码，但收到错误：“错误：常量和 CASE 类型不匹配”

procedure pay;
begin
loop:=loop+1;
CASE loop OF
1: 
writeln('E-Mail: ');
readln(mailO[1]);
writeln('amount: ');
readln(amount[1]);


end;