Rem Square root of x End Rem Function Length!(x!,y!) return Sqr(x*x+y*y) End Function Print "The length of the vector 25,3 is "+Length(25,3)