Какая тема урока ? Скажи попробую сделать
Var
f,b,a,i:longint; // описание переменных
begin
write('Write b, a: ');
readln(b,a); // Присваивание b, a числа
f:=1; // Присваивание f=1
for i:=1 to b do // Нахождение b! (факториала)
f:=f*i;
writeln('x= ',f*(1/sqr(a)):0:2); // вывод результатов(выполнение форумулы)
readln
end.
Код Бодо - длина кодов всех символов алфавита одинакова и равна пяти. В данном случае не возникает проблемы отделения букв друг от друга.Каждая пятерка сигналов — это знак текста.
<span>А у Морзе каждая буква алфавита кодируется последовательностью коротких сигналов в его случае - точек, и длинных сигналов - тире. Буквы отделяются друг от друга паузами, то есть отсутствием сигналов. </span>