Вводится последовательность из N целых чисел. Определить среднее арифметическое двузначных элементов последовательности.
ПАСКАЛЬ
Ответы
Ответ дал:
1
===== PascalABC.NET =====
begin
var n := ReadInteger;
ReadSeqInteger(n)
.Where(p -> p.InRange(10,99))
.DefaultIfEmpty
.Average
.Println
end.
Приложения:
honeYmonnY:
спасибо, но тут много неизвестного. Можно ли обойти все эти слова. более простыми словами, но долгим путем?
В смысле, написать это на ТурбоПаскаль образца 1983 года? Можно, только об этом надо писать в вопросе, а не после получаения ответа.
Будет не два оператора, а потора десятка.
Похожие вопросы
1 год назад
1 год назад
1 год назад
2 года назад
8 лет назад