Delphi - Problema con la suma de dos números decimales

 
Vista:
sin imagen de perfil

Problema con la suma de dos números decimales

Publicado por Eugenis (3 intervenciones) el 13/04/2022 14:37:24
El problema es el siguiente, actualmente estoy desarrollando una aplicación de consola la cual sume dos números decimales (Números de tipo double), estos números son recibidos por teclado. Pero al hacer el calculo, me muestra como resultado un numero en exp (creo que así llama ) y no quiero que me aparezca de esa forma. Quiero que sea de esta manera, por ejemplo, si sumamos 2.5 + 3 = 5.5, es decir, que muestro los resultados como la calculadora de Windows 10. La versión que de delphi que estoy utilizando es la 10.4.

Imagen del programa ejecutándose (Ejemplo):

imagen_2022-04-13_083442738

aquí, debería de ser: 2.5 + 4 = 6.5 solamente y si la suma es de números mas grandes, se pone mas confuso.


Código:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
program Project_Suma;
 
{$APPTYPE CONSOLE}
{$R *.res}
 
uses
  System.SysUtils, System.Math;
 
// Hacer un programa que lea dos números introducidos
// por el teclado y calcule e imprima la suma de los mismos.
 
begin
    var
    Num_1, Num_2: double;
 
    Write('Introdusca un numero: ');
    ReadLn(Num_1);
 
    Write('Introdusca un numero: ');
    ReadLn(Num_2);
 
    WriteLn('Resultado: ', Num_1 + Num_2);
    ReadLn;
 
end.

También me gustaría que me explicaran por que pasa esto en delphi, por que, anteriormente yo he echo este programa en C# y resultado es el correcto, si mucha complicaciones.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 65
Oro
Ha mantenido su posición en Delphi (en relación al último mes)
Gráfica de Delphi

Problema con la suma de dos números decimales

Publicado por Ezequiel (1244 intervenciones) el 18/04/2022 19:55:15
Usa la función FormatFloat();

1
FormatFloat('#,#0.00', Num_1 + Num_2);
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar