Program znanija_com;
uses crt;
var
a,cch,dch,sq,o,c:real;
begin
writeln('Введите число А: ');
read(a);
cch:=Int(a);
dch:=frac(a);
sq:=sqr(a);
o:=frac(a/5);
writeln(cch,' ',dch,' ', sq,' ',o);
end.
последнее даже не понял что там нужно. так что держи без последнего
<span>Код Бодо - длина кодов всех
символов алфавита одинакова и равна пяти. В данном случае не возникает проблемы
отделения букв друг от друга.Каждая пятерка сигналов — это знак текста.</span>
А у Морзе каждая буква алфавита кодируется
последовательностью коротких сигналов в его случае - точек, и длинных сигналов - тире. Буквы
отделяются друг от друга паузами, то есть отсутствием сигналов.
Примерно так.
Ответ: 4.
Конечно, прокручивать это все "в уме" смысла нет. См. вложение.