Ответ:
Аня врёт, Света говорит правду, Оля говорит через раз.
Объяснение:
Аня врёт т. к. в задаче говорилось, что они так никогда не делали. Света сказала правду (и так понятно почему), а Оля соврала, потому что Аня сказала неправду.
Интернет,люди,книги , телевизор, школа
DIM ch$(26)
FOR i = 1 TO 26
ch$(i) = CHR$(ASC("a") + i - 1)
NEXT
DIM cw(26) AS LONG
PRINT "text:"
INPUT "", s$
DO WHILE s$ <> "*"
s$ = s$ + " "
iw = 0
FOR i = 1 TO LEN(s$)
c$ = MID$(s$, i, 1)
IF iw = 0 AND c$ <> " " THEN
iw = 1
idx = ASC(c$) - ASC("a") + 1
cw(idx) = cw(idx) + 1
ELSEIF iw = 1 AND c$ = " " THEN
iw = 0
END IF
NEXT
INPUT "", s$
LOOP
FOR i = 1 TO 25
m = i
FOR j = i TO 26
IF cw(j) > cw(m) OR (cw(j) = cw(m) AND ch$(j) < ch$(m)) THEN
m = j
END IF
NEXT
IF m <> i THEN
tmp = cw(m)
cw(m) = cw(i)
cw(i) = tmp
tmp$ = ch$(m)
ch$(m) = ch$(i)
ch$(i) = tmp$
END IF
NEXT
FOR i = 1 TO 26
IF cw(i) <> 0 THEN
PRINT ch$(i) + ":"; cw(i)
END IF
NEXT
1) Для начала подсчитаем общее кол-во символов.
350 * 60 * 18 = 378000 символов
Теперь подсчитаем информационный вес одного символа по формуле N = 2^i.
128 = 2^i
i = 7 бит
Теперь найдем информационный вес всех символов.
378000 * 7 = 2646000 бит = 323 Кбайт (приблизительно)
2) Найдем информационный вес 1 символа первого алфавита.
N = 2^i
512 = 2^i
i = 9 бит
Найдем информационный вес 1 символа второго алфавита.
N = 2^i
64 = 2^i
i = 6 бит
Найдем количество символов первого ( и 2 ) алфавита.
640Кбайт = 5242880 бит
5242880 / 9 = 58320 символов
Теперь найдем информационный объем второго алфавита.
58320 * 6 = 349920 бит = 43 Килобайт ( приблизительно)
3) 1Кбайт = 8192 бит
8192 / 1024 = 2^13 / 2^10 = 2^3 = 8 бит
Const
s='информатика';
var
s1:string;
begin
s1:=s; Delete(s1,1,2); Delete(s1,7,3);
Writeln(s1);
s1:=s; Delete(s1,1,1); Delete(s1,2,1); Delete(s1,3,3); Delete(s1,4,2);
Writeln(s1)
end.