Какой язык не относится к формальным? а)нотная грамотаб)азбука морзев)хиндиг) язык программирования turbopascal

Азбука морзе
потому что 

const

 AOper: array [0..3] of string = ('+', '-', '*', '/');

var

 a, b, Oper: Integer;

 r: Real;

begin

 Randomize;    // инициализация датчика случайных чисел

 a := Random (1001);

 b := Random (1001);

 Oper := Random (4);

 case Oper of

 0: r := a + b;

 1: r := a - b;

 2: r := a * b;

 3:if b <> 0 then begin

     r := a / b;

   end else begin

     WriteLn ('Произошла ошибка при делении на ноль');

     Exit;

   end

 else r := -1;

 end;

 WriteLn (a);

 WriteLn (b);

 WriteLn (Aoper [Oper]);

 if (r >= 0) and (r - Trunc (r) = 0) then begin   // если в результате получилось положительное целое число

   WriteLn ('yes');

   WriteLn (r :6 :0);

 end else

   WriteLn (' no');

 ReadLn;

end.

Объяснение:

r - Trunc (r) // это выделение дробной части числа

4 + 3 = 7

7 * 2 =14

14 * 2 = 28

28 + 3 = 31

31 * 2 = 62

Объяснение:

Заменим команды на обратные:

плюс 3 (+ 3) на минус 3 (- 3)

умножить на 2 (* 2) на делить на 2 (/ 2)

Будем выполнять действия от большего числа (62) к меньшему числу (4)

Если число будет делится на 2 нацело (без остатка), то будем делить, а если не делится, то вычитать

62 / 2 = 31   (разделилось на 2 без остатка)

31 - 3 = 28   (не разделилось на 2 без остатка)

28 / 2 = 14   (разделилось на 2 без остатка)

14 / 2 = 7     (разделилось на 2 без остатка)

7 - 3 = 4      (не разделилось на 2 без остатка)

Пройдём действия в обратном порядке, заменив команды на исходные

4 + 3 = 7

7 * 2 =14

14 * 2 = 28

28 + 3 = 31

31 * 2 = 62