Pascal record

Bonjour,
il ne demande de faire un enregistrement qui fait:
lecture de nom et prénom et matricule des étudiants;
lecture de module (9 module )et leur coefficient;
lecture de (2 notes de chaque module) et calculer le moyenne de chaque module

moyenne module = (note1+note2/2)*coefficient;
puis on calculer le moyenne général = somme des moyenne des modules/(somme de coefficient);
mais essais sont:
type
module = record
coefficient : integer;
code moudule :integer;
nom_module :sting;
not1,not2:real;
m_module:real ;
étudiant = record
nom :string;
prénom:sting;
m_ana1,m_inf1.................9module:module;
moyenne générale :real;
observation: string;

procédure ajout,
begin
for i:= to n do
whith t eudiant[i] do
writeln ('donner le nom et le prénom et le matricule d'étudiant' );
readln (nom);
readln (prénom) ;
readln (matricule);
end;
procédure 2
begin
for j:= 1 to 9 do
whith t[j] do
write ('donner le nom de module') ;readln (nom de module);
j'ai bloqué ici.
il faut prendre à la considération que (le nom et le prénom et le moyen général et le moyenne de chaque module et observation apparent en même tableau)