Pascal дана последовательность целых чисел a 1 a1 , a 2 a2 , a 3 a3 , a n an , заканчивающаяся числом 0 (само число 0 в последовательность не входит, то есть a i ≠0 ai≠0 ). требуется вывести на экран числа этой последовательности, которые были больше среднего арифметического.
romatrapkin9091
2
30.09.2019 19:02
0
Другие вопросы по теме Информатика
lizamalaya2012
12.02.2022 08:31
tori0077
05.10.2019 18:22
птльгщддшроющшщтьь
03.11.2020 14:38
pandaswomenp08cc4
19.06.2019 09:50
darvin1145
11.12.2019 15:00
адина56
11.12.2019 15:00
aikosha9
11.12.2019 15:00
izirinee
11.12.2019 15:00
Популярные вопросы
- 6. в современном мире полиэтилен широко применяется. заполнив таблицу,...
2 - 3. Напишите программу, которая выводит на экран квадрат чисел от 2 до 10...
1 - Доклад про загрязнение воды и влияние на неё человека длинный 7 класс...
3 - Change the active voice into passive. Thay speak only English in their...
2 - На малюнку кут МNO = 17°. Знайты кут PNM...
2 - 1) Complete the email. Write one word for each space. Dear Heidi We’re...
2 - 5 класс нужно все фото прикрепил...
3 - Які тварини мають шкіру з великою кількістю залоз. 1.Свиня 2.Метелик 3.Жаба...
2 - Що виступає економічною основою системи виробничих відносин? а) відносини...
3 - Создать информационный слайд по произведению третьего направления. Это...
2
begin
var a := ReadSeqIntegerWhile(t -> t <> 0).ToArray;
a.Where(t -> t > a.Average).Println
end.
-5 11 9 14 23 -13 8 6 0 1000011 9 14 23 8