Делал в PascalABC, но в Turbo тоже должно работать. Если не работает, попробуйте перед "End." вставить "Readln".
Program Kisa;
Begin
Writeln('___________________$$____________$$'); Writeln('__________________$___$________$___$'); Writeln('__________________$_____$$$$$$_____$'); Writeln('__________________$____sss___sss____$'); Writeln('__________________$____іі_____іі_____$'); Writeln('_________________$_______$$$________$'); Writeln('_____$$$$$$$$_____$_______$________$'); Writeln('___$$________$_______$$_________$$'); Writeln('____$_________$_____$___$$$$$$___$'); Writeln('_______$______$____$__$________$__$'); Writeln('_______$_____$____$__$__________$__$'); Writeln('______$____$___$$$$__$__________$__$$$$'); Writeln('_____$___$____$____$__$________$___$___$'); Writeln('_____$__$_____$____$__$________$__$____$'); Writeln('____$___$______$____$__$____$_$__$____$'); Writeln('______$__$______$____$___$_$_____$___$'); Writeln('_______$___$$$$$_$___$___$_$____$___$'); Writeln('__________$$$$$_$____$____$_____$____$'); Writeln('________________$$$_$_____$______$_$$$'); Writeln('_____________________$$$$___$$$$$');
End.
<span> 1)зрительная,тоесть когда мы что-то читаем.2)Слуховая,когда мы слышим информацию3)Обанятельная4)осязательная.</span>
На кодирование каждого диода необходим 1 бит (2 состояния - 0/1)
В сегменте 64х32=2048 (диодов или бит).
8 сегментов кодируются 2048х8=16384 (бит) = 2 кБ.
При ежесекундном изменении состояния будет 3600 обновлений за 1 час.
Таким образом, на час необходимо 2х3600 = 7200 килобайт информации.