Arrart_of_records Pascal

Boa tarde preciso ajuda a responde a duas pergunta manual diz o seguinte

4.2) Substitui [2] por instruções apropriadas para escrever os dados do artigo (elemento do array) correspondente ao numero de índice N indicado anteriormente pelo utilizador.
4.3)Substitui [2] pelas instruções que achares necessárias para calcular e escrever os somatório e as medias do preços e das quantidades dos artigos do array A.

Essa são as pergunto o codigo esta a ir baixo pf ajudei me :)



program array_of_records ;
type Artigo = record
Nome : string;
P, Q:real;
end;
var A Array [1..4] of Artigo;
N : integer;
SomaP, SomaQ :real;
MediaP, MediaQ :real;
begin
For N:= 1 to 4 do
begin
write ('Nome do',N,'ºartigo:');
readln (A [N] .Nome);
write ('Insira o preço do ', N,' Artigo:');
readln (A[N] .p);
write ('insira a quantidade do ', N,' Artigo:');
readln (A[n] .q);
end;
repeat
write ('qual nº a veer (1-4)?');
readln (N);
until (N>=1)and (N<=4);
{..2..}
SomaP :=0; SomaQ:=0;
for N :=1 to 4 do
begin
{..3..}
end;
END.