Programación General > Pascal

 Ejercicio En Pascal

<< < (2/2)

juancpalmajr:

--- Cita de: "lau82" --- Escribir un programa en Pascal que sume dos números:
a = 4 b = 3
--- Fin de la cita ---
proba con esto, de todos modos te recomiendo comprar un libro de pascal como minimo. No mejor 3. SI!
 


--- Código: Text --- Program Principal;Uses CRT;Const   Valor='s';  Valor2=&#34;S&#34;;Var  A, B: Integer;  Caracter: Char;  Function Sumar (A,B:Integer):Integer;  Begin    Sumar=A+B;   End;Begin  Caracter='';  While (Caracter&#60;&#62;Valor) And  (Caracter&#60;&#62;Valor2) Do Begin    ClrScr;     Writeln ('Ingrese el primer Numero: ');    Readln (A);    Writeln ('Ingrese el segundo Numero: ');    Readln(B);    C:=Sumar(A, B);    Writeln ('El Resultado de la Operacion es: ',C);     Writeln ('Desea agregar otro numero [S/N]');    Readln (Caracter);   End;   Readkey;End.  

Navegación

[0] Índice de Mensajes

[*] Página Anterior