https://www.passeidireto.com/arquivo/1009725/livro-algoritmos-com-pascal-by-edeyson-gomes
Recomendo esse arquivo que achei no Passei Direto