Operaciones Matemáticas con MOD

Operaciones Matemáticas:

Suma
Resta
Multiplicación
División (DIV)
Residuo de Division (MOD)

CÓDIGO

Program Matematicas; Uses Crt; Var num1,num2,s,r,m,d,d2:Integer; n1,n2:real; Begin ClrScr; WriteLn('Ingrese un Numero'); ReadLn(num1); WriteLn; Writeln('Ingrese otro Numero MENOR que el PRIMERO'); ReadLn(num2); WriteLn; s:=num1+num2; r:=num1-num2; m:=num1*num2; d:=num1 div num2; d2:=num1 mod num2; WriteLn('La Suma es : ',s); WriteLn('La Resta es : ',r); WriteLn('La Multiplicacion es : ',m); WriteLn('La Division es : ',d); WriteLn('El Residuo de la Division es : ',d2); WriteLn; Writeln('Oprima Enter p/Salir'); readln; End.