/
Inicio :: Foros

 F.A.Q.F.A.Q.                  Conéctese para revisar sus mensajesConéctese para revisar sus mensajes   

problemas con redondeo en pascal

 
      Índice del Foro elrincondelc.com -> Pascal, Ada, Delphi y similares
Ver tema anterior :: Ver siguiente tema  
AutorMensaje
fires



Registrado: 25 Dic 2006
Mensajes: 76
Ubicación: Asuncion

MensajePublicado: 05/04/2007 3:54 pm
Título: problemas con redondeo en pascal

hola...Al
hacer mi programa en pascal y usando los operadores mod y div... me redondea los numeros..y yo no quiero...como o hago para que no me redondee...uso turbo pascal 7.0

el codigo es:

Código:
(*  Ejercicio #9 - lenguaje 1
    Escriba un programa que tome un numero de cinco digitos, separe el numero en
    sus digitos individuales e imprima los digitos separados unos de otros
    mediante tres espacios. Por ejemplo, si el usuario escribe 52654 el programa
    deberia imprimir:
            5   2   6   5   4
*)
program cinco_digitos;

uses
    crt;

var
   numero : longint;

begin
    clrscr;
    writeln('Ingrese un numero de 5 digitos: ');
    readln(numero);
    write(numero div 10000,'   ');
    write(((numero mod 10000)/1000):1:0,'   ');
    write(((numero mod 1000)/100):1:0,'   ');
    write(((numero mod 100)/10):1:0,'   ');
    write(((numero mod 10)/1):1:0,'   ');
    writeln;
end.
Volver arriba
gatsu



Registrado: 30 Jul 2005
Mensajes: 5

MensajePublicado: 08/06/2007 9:42 pm
Título:

Por que no pruebas usando cadenas (String) en lugar lugar de numeros. Creo que eso podria facilitarte un poco el trabajo.
Volver arriba
      Índice del Foro elrincondelc.com -> Pascal, Ada, Delphi y similares
Página 1 de 1Todas las horas están en GMT - 8 Horas

 
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas

(c) ElRincondelC.com

Un proyecto de UrlanHeat.com