Páginas

viernes, 28 de febrero de 2014

TURBO PASCAL "SUMA DE DOS NUMEROS"

AKI ESTA OTRO PROGRAMITA "SUMA DE DOS NUMEROS"



PROGRAM EJER1B;
       USES CRT;
       VAR a,b,c:INTEGER;

BEGIN
       ClrScr;

       WRITELN ('Este programa suma dos numeros:');
       WRITELN (' ');
       WRITE ('Introduzca un numero: ');       READLN (a);
       WRITE ('Introduzca otro numero: ' );    READLN (b);
       WRITELN (' ');
       c:=a+b;

       WRITE ('EL RESULTADO ES: ');
       WRITE (c);
READLN;

END.


NO SELES OLVIDE COMENTAR.


No hay comentarios:

Publicar un comentario