Как записать словесным алгоритмом: "0+1+1+1*2*2*2+1*2"? Заранее

В наше время информатика имеет большое значение как в быту так и в учёбе , работе и в иных сферах. Вокруг этой темы крутится множество профессий .В целом информатика это то без чего современного человека представить сложно.Ниужели информатика так сильно влияет на сегодняшнее положение вещей?

Если брать информатику как школьный предмет то мы понимаем что он даёт нам понятия и знание азов в IT-сфере , которые могут перерастать в серёзную , важную и интересную профессию .Без информатики мы не имели бы такого понятия как блогер ,сторис-мейкер , блогер-елюстратор, менеджер блогера...Не могли бы делится своим мнением в сети и в конце концов не было бы и дистанционного обучения.

Вообще м то что я хочу вам донести , а только то что без информатики современный мир теряет перспективы и мы уже не мы .

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n,p:integer;
  var s:string;
  for var a:=1 to 9 do
    for var b:=0 to 9 do
      for var c:=0 to 9 do begin
        n:=100*a+10*b+c;
        s:=(n*n).ToString.Right(3);
        p:=Pos(a.ToString,s);
        if p>0 then begin
          Delete(s,p,1);
          p:=Pos(b.ToString,s);
          if p>0 then begin
            Delete(s,p,1);
            if s=c.ToString then Write(n,'(',n*n,')',' ')
            end
          end
        end
end.

Результат
205(42025) 376(141376) 421(177241) 625(390625) 963(927369)