CLS
INPUT "BBEDITE 3 CHISLA: ", A, B, C
PRINT "Sr = "; (A + B + C) / 3
Пример работы программы:
BBEDITE 3 CHISLA: 2.718281828, 3.141592, 13
Sr = 6.286624
Ответ:
int main()
{
int n = 0;
int temp;
for (int i =0; i < n; i++, n += temp)
{
std::cin >> temp;
}
if (n % 2 == 0) {std::cout << "четное";}
else {std::cout << "нечетное";}
}
Объяснение:
Для анализа результатов независимых испытаний используется формула Бернулли:
Здесь
n = 10 - всего проверяемых документов;
m = 9 - число документов, в которых нет ошибки;
p = 0,9 - вероятность того, что документ не содержит ошибки;
q = 0,1 - вероятность того, что в документе есть ошибка.
<em>// PascalABC.NET 3.2, сборка 1439 от 09.05.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln(Range(2,2*ReadInteger('n='),2).Aggregate(BigInteger(1),(m,n)->m*n))
end.
<u>Пример</u>
n= 37
1891675820705153808241239602722999673157373132800000000
От 11 до 55 = 55-11+1 = 42 варианта
Перестановки = 42^[5] (факториальная степень)= 42 * 41 * 40 * 39 * 38 = 102 080 160