Ответы на вопрос:
var
i,n: integer;
s: real;
begin
repeat
write ('n = '); readln(n);
until (n> 0);
s: =0;
for i: =1 to n do s: =s+1/i;
writeln ('s = ',s: 0: 4);
readln;
end.
V=d*i*t*s - формула t - длительность звучания файла. s - количество каналов звучания. v - объём звукового файла i = 8 бит. d = 8 кгц.
Популярно: Информатика
-
Drftdsrx07.11.2020 03:27
-
гнеуй14.04.2021 19:35
-
yangbomj22831.03.2020 22:24
-
kkatya32204.12.2022 23:00
-
darisha000303.02.2021 11:31
-
Uedo01.08.2020 02:01
-
alicahirdeeva21.08.2022 16:57
-
мария2222826.04.2022 06:19
-
otvet1231343410.12.2022 09:45
-
Zenkinadasha09.05.2022 14:11