Объяснение:
семи пятью органами чувств
Ответ:
program abc;
var m,o,k:int64;
begin
readLn(m);
o:=2000000000;
for i:integer:=trunc(sqrt(m))+1 downto 1 do
if (o>m div sqr(i)) and (m mod sqr(i) = 0) then
begin
o:=m div sqr(i);
k:=sqr(i);
end;
writeLn(k);
end.
Объяснение:
A = 5.
B = 4.
A = B + 4 = 4 + 4 = 8.
Ответ: A = 8, B = 4.