r.txt

来自「用c语言实现类Pacal编译器」· 文本 代码 · 共 8 行

program q;
var a,b;
begin 
a:=1;b:=3;
if a=1 then b:=0;
else b:=4;
end.