#include <bits/stdc++.h>
using namespace std;
int main() {
double sum = 0;
double n = 0;
while (true) {
int x;
cin >> x;
if (x == 0) break;
if (x % 6 == 0) {
++n;
sum += x;
}
}
if (n == 0) cout << "NO" << endl;
else cout << (sum / n) << endl;
return 0;
}
<span>Sub love01()
Dim a(999) As Integer, Count35 As Integer
For i = 0 To 999
a(i) = Int(Rnd * 1000)
</span>Count35 = Count35 - ((a(i) Mod 3 = 0) or(a(i) Mod<span> 5 = 0))</span><span>
Next
MsgBox Count35
End Sub
т.е. 8 элементов)</span>
для краткости
ИЛИ можно заменить на равнозначный знак +
НЕ - !
И - &
выражения 7 и 8 можно упростить
7)
(AvB)&(CvB) = A&C + A&B + B&C + B = A&C + A&B +B&(C+1) =
= A&C + A&B + B = A&C + B&(A+1) = A&C+B
8)
!(A+B)&(C+B) = !A&!B&(C+B) = !A & !B & C + !A & !B & B =
= !A & !B & C + 0
Таблица истинности в приложении
1мб=1048576 байтов
1048576:4=262144 байт