Паскаль,написать код. найти сумму числового ряда: 1^m + 2^m + 3^m + +n^m
118
447
Ответы на вопрос:
//pascal abc.net 3.0, сборка 1053 var n,m,i: integer; s: double; begin write('введите натуральные значения n и m: '); read(n,m); s: =0; for i: =1 to n do s: =s+exp(m*ln(i)); writeln('сумма ряда равна ',s) end. тестовое решение: введите натуральные значения n и m: 5 8 сумма ряда равна 462979 введите натуральные значения n и m: 30 40 сумма ряда равна 1.62897283055013e+59
//pascalabc.net var n,m,i: integer; sum: real; begin readln(n,m); for i: =1 to n do sum: =sum+power(i,m); writeln(sum); end.
Количество информации можно определить как -log2(p), где p - вероятность данного события. оно измеряется в битах. также можно использовать равносильное выражение log2(1/p) вероятность взятия чёрного шара равна 10/20 = 0,5, белого - 4/20 = 0,2, жёлтого такая же - 0,2, красного - в 2 раза меньше - 0,1. значит, если мы взяли чёрный шар, мы получили кол-во информации log2(1/0,5) = log2(2) = 1 бит, если белый, то log2(1/0,2) = log2(5) = 2,3219 бит если жёлтый, то столько же 2,3219 бит если красный, то log2(1/0,1) = log2(10) = 3,3219 бит чем меньше вероятность события, тем большее количество информации мы получаем, когда это событие наступает.
Популярно: Информатика
-
dolbab14.05.2022 21:13
-
Нюйва09.05.2023 17:14
-
KsennyTAR01.11.2022 01:21
-
муля1524.09.2022 08:21
-
юлия2004322.06.2022 12:19
-
МарысяДэн31.05.2022 03:45
-
Александра228019310.06.2022 18:15
-
данилка12503.07.2022 13:54
-
Kefir4ek23.04.2022 03:10
-
lanadanelianlana10.11.2022 06:37