nesse Pascal

Um triângulo retângulo pode ter lados que sejam todos inteiros. O conjunto de três valores inteiros para os lados de um triângulo retângulo é chamado números de Pitágoras. Esses três lados devem satisfazer o relacionamento de que a soma dos quadrados dos dois lados (catetos) deve ser igual ao quadrado do terceiro lado (hipotenusa).Faça um programa em Pascal que;a) determine todos os números de Pitágoras, cujo quadrado da hipotenusa seja menor ou igual à Limite;B) imprima, para cada conjunto encontrado, os três valores inteiros, seguidos da mensagem “ são números de Pitágoras”;c) o valor de Limite é menor ou igual 10000, e deverá ser fornecido através de uma unidade de entrada (monitor).Obrigado