[Gvozd]

var a=eval(document.forma.x.value);
var b=eval(document.forma.y.value);
var a1=a;
var b1=b;

это что за бред?

while (a % b!=0)
{
c=b;
b=a % b;
a=c;
}

alert(al / b);

а это что за еще больший бред?

тут у вас везде ошибка.
от знаний языка, до умения составлять алгоритмы.
то чтов ы написали можно выкинуть на помойку