Programa de Sumas

program suma;
uses crt;
    var
       a,b,c: integer;
begin
     clrscr;
     write('teclea un numero : ');
     readln(a);
     write('teclea otro numero : ');
     readln(b);
     c:=a+b;
     writeln('la suma es :  '  ,c );
  readln;
end.