problema con programa sencillo en pascalCerrado

Question

hola, tengo este problema

"Ingrese 2 numeros enteros y debera sumarlos, restarlos, multiplicarlos y dividirlos solo que su resultado debe ser real. Recuerde que no puede usar mas de 2 variables"

este fue el codigo que hice: pero no me corre

PROGRAM EJERCICIO2;
VAR a,b:INTEGER;
{suma, resta, multiplica y divide 2 numeros reales}
 
BEGIN
WRITELN ('Este programa suma, resta, multiplica y divide:');
WRITELN ('Escriba dos numeros ENTEROS');
WRITELN (' ');
Read(x);
Read(y);

WRITE ('SUMA:'); 
WRITELN (x+y:3:0);
WRITE ('RESTA:'); 
WRITELN (x-y:3:0);
WRITE ('MULTIPLICACION:'); 
WRITELN (x*y:3:0);
WRITE ('DIVISION:');
WRITE (x/y:5:2);

END.

el compilador me da error en la linea "WRITELN (x+y:3:0);"

leo_d · Answer

Hola, No conosco pascal pero es posible que no se pueda hacer la operación dentro de la misma linea del write

PROGRAM EJERCICIO2; 
VAR a,b: REAL;

BEGIN 
WRITELN ('Este programa suma, resta, multiplica y divide:'); 
WRITELN ('Escriba dos numeros ENTEROS'); 
WRITELN (' '); 
Read(x); 
Read(y); 

WRITE ('SUMA:'); 
x:=x+y;
WRITELN (x:3:0); 
x:=x-7;
WRITE ('RESTA:'); 
x:=x-y;
WRITELN (x:3:0); 
x:=x+y;
WRITE ('MULTIPLICACION:'); 
x:=x*y;
WRITELN (x:3:0); 
x:=x/y;
WRITE ('DIVISION:'); 
x:=x/y;
WRITELN (x:3:0); 

End.

Con un poquito de logica matematica podes pulir el codigo un poco y sacar un par de operaciones, je... Avisame si anda porque te vuelvo a recordar q no conozco pascal

Problema con programa sencillo en pascal

1 respuesta

Discusiones similares

¡Suscríbete a nuestra Newsletter!