UCV Ayudantia 13/03/2017 part2 Tarea

Program Sumar3Numeros;

var num1,num2,num3:integer;
begin

writeln('_______________________________________________________________');
writeln('                        Bienvenido');

writeln('Este programa es para conocer la suma de 3 números naturales');

writeln('Ten en cuenta que este programa cuenta con un limite de 32767 para la suma');

writeln('Además de que no se permiten números negativos ni decimales');
writeln('_______________________________________________________________');

writeln('Ingrese el 1° número [Natural]');
read(num1);

writeln('Ingrese el 2° número [Natural]');
read(num2);

writeln('Ingrese el 3° número [Natural]');
read(num3);

// and sirve como un "y";
// or  sirve como un "o";
if (num1+num2+num3<=32767) and (num1+num2+num3>=0) then
       begin
       writeln('La suma de los números ingresados fue: ', num1+num2+num3, '.');
       end
       else
       writeln('Los números ingresados para la suma son inválidos');

end.