Código Pascal para calcular el área de un rectangulo

program area;

var

   h:integer;
   base:integer;
   r:integer;

  begin
      writeln ('escriba el Altura');
      readln (h);
      writeln('escriba la base');
      readln (base);
      r:=(base*h);
      writeln('el Area es:',r)

  end.

definición de palabras reservadas y operadores:

Program: establece el nombre del programa debe llevar un end al finalizar las instrucciones de dicho programa.

var:  establece las variables de hay en adelante se indican el numero de variables a usar durante todo el ciclo de vida del programa.

integer: tipo de dato entero.

writeln: escribe en consola dejando un espacio al finalizar lo escrito "tecla enter"

Readln: lee de la entrada básica "teclado" en consola hasta el ultimo salto "tecla enter"

:= operador de asignación de valor a una variable.

(* los comentarios van de esta manera*)