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