Ver originales (Francés)

Programa de una calculadora en Pascal

bocandé Mensajes publicados 4 Estado Miembro -  
 Lion -
hola la confradía, os escribo para presentaros un problema, el de poder realizar una calculadora en Pascal. No consigo ejecutar 2 cálculos consecutivos sin reiniciar la aplicación. ¿Qué hacer?

5 respuestas

Respuesta 1 / 5
bagnola911
 
program_calculadora; 

uses WinCrt; var a,b,r:real; x:char; function add(var a,b: real):real; begin r:=a+b; end; function sub(var a,b: real):real; begin r:=a-b; end; function mul(var a,b: real):real; begin r:=a*b; end; function divis(var a,b: real):real; begin r:=a/b; end; begin writeln('calculette PASCAL'); readln(a); readln(x); readln(b); case x of '+': add(a,b); '-': sub(a,b); '*': mul(a,b); '/': divis(a,b); end; writeln(r); end.


de la part de mehdi skikda algérie en 2eme année informatique LMD
23
RIHEM
 
pero, ¿cómo se hace eso en Lazarus Pascal?????
0
Lion
 
Gracias
0
Respuesta 2 / 5
marvinrouge
 
Hola Bocandé,

Envíanos tu código, lo vamos a corregir.

marvinrouge
2
Respuesta 3 / 5
zinoudu23
 
este programa no es válido porque
1_el cálculo fi para 1 vez
2_el programa no reconoce el '=' ok;
dame tu msn quiero ayudarte
2
Med lamine
 
Hola
Soy un estudiante de la Universidad de Skikda, en busca de un programa de cálculo
Gracias
0
aminesoft
 
hola porque no es valido , soy un estudiante de 2º año de informática en skikda , necesito ayuda para hacer este tp con una memoria m1 y m2
0
fifi > aminesoft
 
Hola, también necesito este TP, edítame este mes mi correo Mail Meriem .fifi@yahoo.fr
0
Med lamine > fifi
 
Hola
Soy un estudiante de la Universidad de Skikda, en segundo año de informática medlamine21@hotmail.fr
0
merieming
 
Nkolkom haja rir bouchham eli ma takadrouch tla3bo 3lh. Meriem ingénieur d'État en informatique, j'ai fini mes études universitaires.
0
Respuesta 4 / 5
holow1 Mensajes publicados 739 Estado Miembro 71
 
Hello,

I noticed 2 errors in your program

1- the 1st in the function divis you must first verify whether b is different from zero

2- the 2nd you must see this ^_^ to understand well

https://pascal.developpez.com/cours/ptrau/?page=page_13#LXIII-D

your problem is located at the two levels: the function calls + the result returned by each function of your program

here is the solution https://pascal.developpez.com/cours/ptrau/?page=page_13#LXIII-D
2
Respuesta 5 / 5
ze choupinette Mensajes publicados 2 Estado Miembro
 
Hola, por favor si ya hiciste este programa no podrías pasármelo porque lo necesito mucho, cuenta como control y tengo que entregarlo en dos días :/
0