subtraktion.pas

来自「Pasc+Java 这是一个国外的随机自动机*(RAM)一个学习用的程序」· PAS 代码 · 共 7 行

function sub(x, y);
begin
	a := (x - y);
	sub := (a* 2)
end