test0.bak

来自「很详细的PL0编译演示程序,学习编译的极品!」· BAK 代码 · 共 11 行

const a=10;
var b,c;
begin
        read(b);
	c:=11;
        while b#0 do
        begin
            write(b*c); read(b)
	end
end.