{
Aquí muestro un ejemplo en turbo pascal de división en el cual se introducen dos valores de los cuales se divide el primero entre en segundo, mostrando el residuo o la sobra de la division tambien.
Program P3AE4 (input,output); uses crt; Var num1, num2, total,x: Integer; Begin writeln('Suma'); writeln('Ingrese el dividendo:'); readln(num1); writeln('Ingrese el divisor:'); readln(num2); total:= num1 div num2; x:= num1 mod num2; writeln('El total de la division es: ',total); writeln('sobrando: ',x); readkey; End.
Descargar código:
}