系统错误：溢出.pl0

来自「PL0的一个编译器」· PL0 代码 · 共 11 行

var a,b;
begin
	a:=1;
	b:=32768;
	a:=a/b;
	write(a)
end.