Pascal/Turbo Pascal - necesito ayuda auuuuxxxxiiiiiiiillliiiio

por favor necesito ayuda con un programa para encontrar la media de cinco calificaciones de un estudiante y visualizar una tabla de notas de esta forma. este es un programa sencillo de acuerdo a lo que dice mi profesor lo que pasa es que apenas estamos iniciando y el no nos ha penseñado aun a programar en pascal y ya nos mando a hacer un programa que tal. agradesco su ayuda

program media;
var
I, resultado, aux : Integer;
begin
resultado := 0;
for I := 1 to 5 do
begin
write ('Introduzca el numero ', I , ' ');
Readln (aux);
resultado := resultado + Aux;
end;
writeln ('la media es ': resultado div 5);
readln;
end;

UN SALUDO.