В отличие от кода Морзе, код Бодо двоичный: в нем каждый символ кодируется 5 битами. Это позволяет четко разделять знаки. Код Морзе по сути троичный (точка - тире - пауза) и плохо подходит для переключающих схем, имеющих два устойчивых состояния.
350 килобайт - 0,35 Мегабайт
1,44Мб+0,35Мб=1,475Мб
В параллелограмме указан ввод числа в переменную А, т.е. А будет равно 25;
Далее присваиваем значение переменным Х=1 и S=0;
Проверяем/сравниваем (обычно это условный оператор if).
У нас действительно S меньше или равно А, т.к. 0<25;
Выполняем блок действий Х=Х*4 (т.е. Х=4); S=S+X (т.е. S=4);
Опять проверяем/сравниваем 4<25, опять выполняем блок действий.
X=4*4=16 (т.к. старое значение уже было 4 и оно хранится в памяти)
S=4+16=20 (тоже что и с иксом);
Опять проверяем 20<25. Опять выполняем блок действий:
X=16*4=64
S=20+64=84
Проверяем :-) (надоело уже) 84<20????? Нет больше. Идем по ветке нет, т.е. выводим S.
На экране отобразиться число 84.
<h3>PascalABC.NET 3.4.2, сборка 1881 от 19.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var x := ReadReal('x =');
var fx: real;
// полный if
if x < -1 then fx := 2 * x + 4
else fx := x * x;
// сокращенный if
if x < -1 then fx := 2 * x + 4;
if x >= -1 then fx := x * x;
// совсем короткий вариант
fx := x < -1 ? 2 * x + 4 : x * x;
// результат
Writeln(fx)
end.