sem assunto

[norua]

Antes de mais deixa me dizer que o Pascal não é de todo a minha praia visto ja não mexer com ele há cerca de 5 anos, dito isto vou tentar ajudar no que puder,o resto tenta a tua sorte no google.

Seguidamente, aconselho-te a no futuro numerares as peguntas de maneira a facilitar a criação e compreensão das repostas .

Falta-te um ciclo infinito antes do menu de maneira a que depois de o utilizador escolher uma opcção e as instruções referentes a essa opcção sejam executadas volte a aparecer o menu, para terminar o programa mete o comando "halt" na opcção 4.

Na opcção 1 não precisas nem consegues analisar todos os numeros de contas já existentes no array portanto vais ter de compara a variável conta com todas as contas dos cadastros no array, ficando algo deste género:

1:
begin
for i:=1 to 3 do
begin
writeln (‘Digite o número da conta: ');
readln (ContaAuxiliar); (esta e uma variavel que tens em falta pois falta-te um lugar provisório onde armazenar o numero de conta que queres testar)

if F_CADASTRO[i].CONTA == ContaAuxiliar then
begin
writeln (‘Número de conta já existente. ');
flag=1; (variável que te falta definir que começa com o valor "zero" e só muda de valor caso já exista uma conta com aquele número)
end;
end;
if flag==0 (visto que esta variável só muda para um valor diferente de "zero", neste caso para "um" se existir uma conta com o número de conta igual á que prentendes cadastrar isto serve como teste)
begin
with F_CADASTRO[i] do
CONTA=ContaAuxiliar;
writeln ('Digite o nome do cliente: ');
readln (NM);
writeln ('Digite o saldo da sua conta: ');
readln (SALDO);
end;
end;


Deixo-te aqui este código para analisares testares e compreenderes, assim que fizeres estas 3 coisas se tiveres alguma dúvida apita.

Cumps.