С клавиатуры вводятся числа, пока не будет введено число, делящееся на 5. Подсчитать количество и сумму тех, которые больше 10.
Паскаль

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ReadSeqIntegerWhile(n->n mod 5<>0).Where(n->n>10).ToArray;  Writeln('n= ',a.Count,', S=',a.Sum)end.Пример37 -18 42 57 24 9 17 20n= 5, S=177