From a given number u who is congruent how to find the rational sides of rectangle triangle of which u is the area.
Example from 34 I would like 24,17/6 et 154/6 for 24*17/6*1/2=34 ;
               fom 111 I would like 444/35, 35/2 et 1513/70 for 444/35*35/2*1/2=111.
Thanks you.

There is a problem this procedure FC does not work

I don't see what is u ? Thank you.

rang:=proc(M,a)
local i:
for i from 1 to nops(M)-1 do
if M[i]=a then return(i) fi od
end: