Информационное сообщение состоит из 200 символов и весит 800 битоа какова мощность алфавита?
161
392
Ответы на вопрос:
Var s : real; i, n, s1: integer; begin s : = 0; s1: =0; readln (n); for i : = 1 to n do begin s1: =s1+i; s : = s + 1 / s1; end; writeln (s); end. пример: 5 1.66666666666667
Популярно: Информатика
-
salievtrofim2028.11.2022 01:49
-
artemchurkin22.02.2022 19:45
-
viktoriyabolgova07.10.2022 13:26
-
pastoling28.04.2023 08:04
-
khana303.07.2021 15:11
-
evgeniaf39901.10.2021 00:58
-
Kotikiwin11.06.2021 23:16
-
Andrey011604.03.2022 16:55
-
Soonthanyou19.05.2023 05:11
-
MartiKetris30.04.2022 23:36