Напишите программу, которая в последовательности целых чисел определяет среднее арифметическое положительных чисел , кратных 8. программа получает на вход целые числа, среди них есть хотя бы одно положительное число, кратное 8, количество введёных чисел неизвестно, последовательность числом заканчивается числом 0 (0 - признак окончания ввода , не входит в последовательность программа должна вывести одно число: среднее арифметическое положительных чисел кратных 8. входные данные 10 16 8 14 0 выходные данные 12 составить программу

#include <iostream>

using namespace std;

int main() {
 int a = -1, s = 0, c = 0;
 while(a != 0) {
   cin >> a;
   if( a > 0 && !(a%8)) {
      s+=a;
      c++;
    }
 }
 cout << (double)s/c << endl;
}   

1 - моделью
2 - меньше информации
3 - глобус, макет здания, муляж яблока, манекен
4 - рисунок, фотография
5 - знаковой
6 - смешанной
7 - автомобиль — техническое описание автомобиля, город — путеводитель по городу
8 - существенные признаки объекта-оригинала
9 - разные модели объекта
10 - физическая карта, график зависимости расстояния от времени, схема узора для вязания крючком, схема метро
11 - словесное описание, формула
12 - знаковой
13 - смешанной
14 - болт — чертеж болта, мелодия — нотная запись мелодии

Четное число делится на два, а кратное пяти делится на пять, поэтому число должно делиться без остатка на 2х5=10

// PascalABC.NET 3.0,сборка 1076
begin
  var n:=ReadInteger('Длина последовательности: ');
  var a:=ArrRandom(n,-50,50);
  Writeln('Исходная последовательность');
  a.Println;
  Writeln('Сумма элементов: ',a.Sum);
  Write('Кол-во четных, кратных пяти: ');
  Writeln(a.Where(x-> x mod 10 = 0).Count)
end.

Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1