Написать программу через repeat. При введении последовательности чисел необходимо посчитать сумму всех введенных отрицательных чисел.

Большое спасибо!)

Написал программу на паскалеОбратите внимание, при вводе code цикл завершается.По умолчанию code = 999;