NOTAS:
Presenta los numeros pitagoricos que existan en el rango 
dado (los numeros pitagoricos son aquellos en que se cumple
que el cuadrado de uno es igual a la suma de los cuadrados
de los otros dos: i^2 = j^2 + k^2).

inf : limite inferior del rango a analizar
sup : limite superior del rango a analizar


procedure pitagoricos(sup, inf)
  for i=sup to inf do
    j = 1
    bucle = VERDAD
    while (j<i) and (bucle=VERDAD) do
      k = j
      while (k<i) and (bucle=VERDAD) do
        if i*i = j*j+k*k then
          print(i, j, k)
          bucle = FALSO
        end if 
        k = k + 1
      end while
      j = j + 1
    end while
  end for
end pitagoricos