Давно не работала в Паскаль и уже забыла, что и как писать. Если что могу написать на С++
а блок схема выглядит так
2 изображение - так примерно должна выглядеть программа, но возможны какие-то неточности, так как повторюсь, плохо знаю язык. надеюсь, чем-нибудь помогла