Язык паскальДаны естественное число N и вещественные числа b1, b2, ,

Язык паскаль

Даны натуральное число N и вещественные числа b1, b2, , bn. Найти сумму тех вещественных
чисел, которые больше P.
Входные данные
Во входном потоке в первой строке через пробел записаны два числа: естественное число N (1 lt;= N lt;=
1000) и вещественное число P (-10000 lt;= P lt;= 10000). Во второй строке через пробел записаны N
вещественных чисел bi(-10000 lt;= bi lt;= 10000).
Выходные данные
В выходной поток следует записать сумму тех вещественных чисел bi
, которые больше P