Написать программу в Pascal

OLGA в категроии Информатика, вопрос открыт 22.06.2018 в 00:12

Даны число A>0, числа x1,x2....
Необходимо вводить числа x1,x2.... , пока сумма модулей введенных чисел будет меньше A. Определить число введенных чисел.

P.S В поисковике искал, нашел 2 какие-то странные программы, они мне не подходят