Предмет: Информатика,
автор: Viron717
Дан ряд из 15 чисел. Найти среднее арифметическое всех нечетных чисел и вывести. Паскаль
Ответы
Автор ответа:
0
//PascalABC.NET
begin
readseqinteger('Введите 15 чисел:',15).Where(x -> Odd(x)).Average.Println;
end.
begin
readseqinteger('Введите 15 чисел:',15).Where(x -> Odd(x)).Average.Println;
end.
Похожие вопросы
Предмет: Русский язык,
автор: militskovakira
Предмет: География,
автор: pikkuya
Предмет: Физика,
автор: staff4ikkkkkk
Предмет: История,
автор: лиза1039000
Предмет: Химия,
автор: DaryaDelReY