用tiny语言编写计算两个数的最大公约数和最小公倍数

{ Sample program
  in TINY language -
  jisuan
}
read x; { input an integer }
read y; { input an integer }
if x<y then
   max := y;
   y := x;
   x := max;
   factmin := x-1;
   factmax := y+1
else
   factmin := y-1;
   factmax := x+1
end;

repeat
    factmin := factmin+1;
    resultone := factmin / x;
    resulttwo := factmin / y;
    testone := factmin - x * resultone;
    testtwo := factmin - y * resulttwo
until testone + testtwo = 0;
repeat
    factmax := factmax-1;
    resultthree := x / factmax;
    resultfour := y / factmax;
    testthree := x - x * factmax;
    testfour := y - y * factmax
until testthree + testfour = 0;

if 0<x+y then
   write factmax;  { output factorial of x }
   write factmin  { output factorial of x }
end

只是在完成课程实验的时候学了学tiny的语法，没有很了解，只是在尝试的过程中发现，结尾的分号很容易出错。