Using System;
class Calc
{
static void Main(string[] args)
{
double s = 0;
for (int i = 1; i < 11; i++)
{
s += (double)1 / i;
}
Console.WriteLine(s);
Console.ReadKey();
}
}
Осталось выяснить, сколько у ветра направлений. Если их 8 - стороны света + половинки меж ними - то на один отсчёт ветра нужны три бита информации, 2^3 = 8
И 160 измерений займут
160*3 = 480 бит
<em>// PascalABC.NET 3.2, сборка 1488 от 21.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadSeqReal('10 чисел через пробел:',10).Reverse.Println
end.
<u>Пример</u>
10 чисел через пробел: 3.6 -2.17 5 12.7 0 1e-12 82 3.18e6 -263 3.14
3.14 -263 3180000 82 1E-12 0 12.7 5 -2.17 3.6
2,3,5,7,11,13,17,19,23,29,31,37,41,43,47.
.................................