Necesito algunos consejos sobra como hacer estos ejercicios en programacion Fortran95

Determinar si un cierto número entero, n, es par o impar. Utilice funciones
intrínsecas de F : Este lo he planteado de la siguiente manera:
program par
integer:: numero1, numero2
real:: resto
read*, numero1, numero2
resto = mod (numero1,numero2)
if (resto == 0) then
print*, "par"
else if (resto == 1) then
print*, "impar"
end if
end program par

Sin embargo, el comando mod me han dicho que no funciona para hallar el resto asi que estoy intentando usar el algoritmo de euclides pero no se como

• Hallar la suma de los cuadrados de los 100 primeros números enteros impares.
• Encontrar las n raíces n-ésimas de un número.
• Resolver una ecuación de segundo grado. Examine previamente toda la casuística
posible.
• Determinar el factorial de un número. Construya una función factorial