Охранник обходит здание, в котором из-за длинных стеллажей с товарами двигаться приходится «змейкой» - id2049596220230315 от nurkenalmazbek 15.03.2023 15:32

Question

Информатика: Охранник обходит здание, в котором из-за длинных стеллажей с товарами двигаться приходится «змейкой» как показано на рисунке. По известным длинам переходов a и b определите длину маршрута охранника (a и b —— это высота и ширина минимального прямоугольника, в котором содержится маршрут). ответом на эту задачу является некоторое выражение, которое может содержать целые числа, переменные a и b (обозначаются английскими буквами), операции сложения (обозначаются +), вычитания (обозначаются -), умножения

nurkenalmazbek · Accepted Answer

// 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)

MOGZ ответил