Criar um programa com o ciclo For

Criar um programa em Pascal  que realize a estatística das notas de uma turma, em que:

• o número de alunos da turma é introduzido pelo utilizador (devendo ser sempre superior a zero)
• o resultado deve de ser:
• média da turma nas disciplinas de português e matemática
• número de negativas nas disciplinas de português e matemática
• não é válida a introdução de notas com valores inferiores a 0 e superiores a 20

Uma solução possível aqui, haverão seguramente outras soluções diferentes!!! Código Aqui