DIM s AS STRING, s1 AS STRING, n AS INTEGER
DIM i AS INTEGER, c AS STRING * 1
INPUT "s=", s
s1 = ""
FOR i = 1 TO LEN(s)
c = MID$(s, i, 1)
IF c <> "*" THEN s1 = s1 + c + c
NEXT i
PRINT s1
END
<em><u>Тестовое решение:</u></em>
s=12.4*1.45+sin(2*Pi*x)
1122..4411..4455++ssiinn((22PPiixx))
Чтобы продолжить, нажмите любую клавишу
164•8•128•32•64/8•1024•1024=
164•2^7•2^5•2^6/2^10=
164•2^18/2^10=
164•2^8=
164•2^8/2^10=164/4
41Кбайт
Разбивают на группы по три буквы, затем каждую группу разворачивают "задом наперед":
например:
красота
кра - сот - а
арк - тос - а
значит, чтоб "расшифровать" - делаем то же:
фнимроицая
фни - мро - ица - я
инф - орм - аци - я
Ура!)
Зависит от того в сколькобитовой кодировке оно закодировано.
Считаешь количество символов в строке (включая пробелы и знаки препинания), и умножаешь на количество бит, приходящееся на 1 символ.
если на 1 символ приходится 8 бит (8-битовая кодировка, например koi-8), то информационный объем слова "Дмитрий" будет равен 7*8=56 бит
если кодировка 16-битная, то 7*16=112 бит.