ТутРешу.Ру

Дан массив состоящий из 20 целых чисел

Задание:

Дан массив состоящий из 20 целых чисел. Требуется найти среднее арифметическое его нечетныхэлементов?

Решение:

Uses crt; const n=20; var i,average,count: integer; a: array[1… n] of integer; beginrandomize; writeln ('Введите элементы массива: '); for i: =1 to n dobeginread (a[i]); if i mod 2<>0 thenbeginaverage: =average+a[i]; inc (count); end; end; writeln (average DIV count); end.




Знаете другой ответ?

Отправить свой ответ