Ejercicio 1 E/S

(*Programa que solicita nombre y edad y le devuelve un saludo indicandole la edad que tiene.*)
Program saludo(input,output);
Var
   nombre : string;
   edad : integer;
BEGIN
   write('Introduzca usted su nombre: ');
   readln(nombre);
   write('Introduzca usted su edad: ');
   readln(edad);
   writeln;
   write('¡ Buenos días ',nombre,', tiene usted ',edad,' años¡');
END.