Variable tipo palabra (cadena)

En este programa lo que hacemos es crear una variable que almacene letras
pedimos al usuario que escriba algo y lo guardamos en nuestra variable
luego le pedimos al PC q muestre lo que almacenamos

program Project11;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var palabra:string;//String es un tipo de variable que
                   //almacena palabras o letras

begin
  { TODO -oUser -cConsole Main : Insert code here }
writeln('Ingrese una cadema (palabra)');
readln(palabra);                   //Almacenamos lo que escriba
                                   //el usuario donde tambien
                                   //pueden ser numeros pero la
                                   //PC toma como si fueran letras

writeln('Su palabra es= ',palabra);//Escribimos 'Su palabra es= '
                                   //y luego lo que contiene la
                                   //variable palabra  
readln;
end.