ghastlyX, creo que la programación funcional no es algo que tenga muy bien entendido él. Con lo de la inicialización según dijo, en fortran no se necesita
.
Ahora bien, el error que le marcaba para revisar es lo que se citó:
sólo miras si m es amigo de algún número dentro del intervalo, pero si el intervalo es [30,50], no miras nunca si 34 es amigo de 42,
Fijate que nunca s y t llegan a ser iguales por eso no lanza el print.
Si pueden llegar a ser iguales para alguna entrada.
CharderakFijate lo que citó ghastlyX y su explicación.
Si no sabés utilizar un debugger, haz una prueba de escritorio