este programa utiliza dos variables donde el usuario ingresa un valor para cada variable y el programa muestra el resultado de la sumatoria de ambos





program Project1;

{$APPTYPE CONSOLE}

uses
SysUtils;

var x,y:integer; //variables a utilizar (x,y) y su tipo en este caso enteros(integer)
begin
{ TODO -oUser -cConsole Main : Insert code here }
{Este primer tema conoceremos las variables y su uso}
Write('Ingrese un numero '); {este comando le dice a la maquina que escriba si es palabra se colocan apostrofos a cada lado}
readln(x); {le ordenamos a la maquina q lea lo q escribe el usuario y lo guarde en la variable x}
writeln('ingrese otro numero');{este tipo de write escribe y salta una linea abajo se puede usar cualquiera de las 2 formas
es cuestion de estetica}
Readln(y); {lee el valor para (y)}
write('el resultado es = ');
writeln(x+y); {en esta parte no se colocan apostrofo pues la orden es
**escribir lo q esta almacenado en (x) mas lo q esta almacenado en (y)**}

readln; {esta linea es para q el programa espere a q se presione la tecla "enter" antes de finalizar}

end.