Дан массив a из n целых чисел. Требуется определить, превосходит ли 100 сумма элементов, которые больше 20.
Написано на языке pascal
спасибо
W3MMR странно но с такими входными данными не работает 4 и -10 5 7 21
Работает, просто вы вводите 5 чисел, а массив состоит из 6, так как первый элемент идет с 0, это моя ошибка, просто исправьте [1..N] и в циклах начиная с единицы var i:=1
Ещё раз спасибо