program suma03;
uses crt;
var
a,b,suma:integer;
{Programa para realizar la suma de 2 números enteros
 introducido por el teclado. Por: Rafael Aquino }
begin
     clrscr;
     writeln (' Programa que suma Dos números enteros');
     writeln;
     write (' Introduzca primer número ');
     read (a);
     write (' Introduzca segundo número ');
     read (b);
     suma:= a + b;
     writeln;
     writeln ('La suma de ',a,' y  ', b, ' es: ',suma );
     readkey;
end.