Исправьте ошибку в задачев конце EndПаскаль ошибку пишет
Ответ:
вы 2 раза читаете переменную а, во втором readln в скобках поменяйте a на b
проблема в 9 строке почему то
говорит S неизвестное имя
да и у вас переменная s не описана в var, просто добавьте ее туда через запятую