Const a:array[1..12] of integer=(31,28,31,30,31,30,31,31,30,31,30,31);
var b:integer;
begin
readln(b);
writeln(a[b]);
<span>end.</span>
<u>Результат работы программы(при e = 2.718281828459045):
</u><em>3.71828182845905</em>
<em>6.11325037878293</em>
<em>8.65223367403409</em>
<em>11.3890560989306</em>
<em>14.3564690166011</em>
<em>17.5824351900074</em>
<em>21.0940301070678</em>
<em>24.9188286785579</em>
<em>29.0855369231877</em>
<em>33.6243429220178</em>
<em>38.5671484533409</em>
<em>43.9477455058849</em>
<em>49.8019662871682</em>
<em>56.1678206691979</em>
<em>63.0856283809521</em>
<span><em>Сумма элементов массива с нечетными индексами равна 228.361294670811
</em>-------------------
Код программы в приложении (компилятор Pascal ABC.NET).</span>
3 5 7 9 11 13 15 17 19 21 23 25
Доказательством ..... Ну может. Хотя.. Просто странно