У ис­пол­ни­те­ля Квад­ра­тор две команды, ко­то­рым при­сво­е­ны номера: 1. возведи в квадрат 2. прибавь 2 Со­ставь­те ал­го­ритм по­лу­че­ния из числа 1 числа 85, со­дер­жа­щий не более 5 команд. (В ответе запишите только номера команд без пробелов, запятых и иных символов.

Смотри: У нас есть 2 команды: 1) Вычитать какое-то число из общего числа 2) Умножить общее число на 2.

Нам дан алгоритм который переводит число 3 в число 18

Алгоритм таков: 2 2 1 2

Что это значит?

1. Сначала идет 2, значит мы берем наше первоначальнео число - 3 и умножаем его на 2. Получается 6

2. Далее идет снова 2, значит мы берем наш ответ - это 6 и уможаем его снова на 2. Получается 12

3. Далее у нас идет 1. Значит нам нужно 12 отнять какое-то число и потом результат умножить на 2, но мы не знаем какое. Давай посмотрим на конечно число - оно равно 18. А последнее действие у нас умножить на 2. Какое число нужно умножить на 2, чтобы получилось 18? ответ: 9. Значит 12-3=9.

3 - это число n

4. Далее снова идет 2. Значит мы берем 9 и умножаем его на 2. Получается 18.

var a, b, c, d :real;
      k:integer;
begin
   read (a, b, c);
   k:=0;if b=c then
      begin
      d:=c;
      c:=a;
      a:=d;
      end;
   if a=c then
      begin
      d:=c;
      c:=b;
      b:=d;
      end;
   if (a=b) and (a+b>c) then inc(k);
   if a+b<=c then k:=2;
   if k=0 then writeln ('Треугольник не равнобедренный');
   if k=2 then writeln ('Это вообще не треугольник');
   if k=1 then    
      begin   
      d:=sqrt(a*a+b*b);   
      if d>c then writeln('остроугольный равнобедренный');
      if d<c then writeln('тупоугольный равнобедренный');
      if d=c then writeln('прямоугольный равнобедренный');
      end;
end.
P,S, Надеюсь на благодарность и лучший ответ.