Var A, B, C, AC, BC: integer;
begin
readln(a, b, c);
AC := abs(C - A);
BC := abs(B - A);
S := AC + BC;
Writeln('AC = ', AC);
Writeln('BC = ', BC);
Writeln('S = ', AC+BC);
<span>end.
Через модули если только)</span>
Сумма андрея + (сумма андрея/100*простые проценты)
<span>Код Бодо - длина кодов всех
символов алфавита одинакова и равна пяти. В данном случае не возникает проблемы
отделения букв друг от друга.Каждая пятерка сигналов — это знак текста.</span>
А у Морзе каждая буква алфавита кодируется
последовательностью коротких сигналов в его случае - точек, и длинных сигналов - тире. Буквы
отделяются друг от друга паузами, то есть отсутствием сигналов.
Примерно так.
Их различия это цвета, форма и размеры