domingo, 15 de marzo de 2015

G11 - Programa de ejemplo

Escribir un programa en Pascal que sume dos números: 

a = 4 b = 3
PROGRAM EJER01;
        var a,b,c:INTEGER;
BEGIN
{Empezamos con lo básico, un programa que escribe la suma de 2 numeros
en pantalla}
        a:=4;
        b:=3;
{Se asigna un valor cualquiera a las variables "a" y "b"}
        c:=a+b;
                WRITE (c); {Muestra en pantalla el valor de la suma}
END.

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);
END.