Would this work for you?

q := r -> piecewise(0 <= r and r < 0.1*Unit(`mm`), 5*Unit((`kW`)/`m`^2));

It prits to pdf ok for me on Windows 10.

On windows  pagesetup is under File, Print and the are threee options.  Print, Print Preview and Page Setup.

Edit:- Maybe I misunderstood your question on the page layout and showing page break at about 80%. If you mean this icon I had a problem with it on the page break. Tried everything to fix it in page setup. Eventually I used Maple 2023 where it works ok, to print the documents. It must be a bug.

This gives solutions. The oupput looks messy though. 

eq := 2^x*(2 + sqrt(3))^x - 2*(1 + sqrt(3))^x = 2

solve(eq, x)

allvalues(%)

See solve details - Maple Help   for more information.

I can find integer values for the vertex coordinates and the angle bisector.  Could not find side lengths with integer values.

Download 2025-11-22_A_Special_Triangle.mw

  This might help. In Maple 2024 under Format Styles  you can alter the font and other settings. Different Styles sets can be exported and imported using Manage Styles Sets.

I am not exactly sure frm you wording of "k consecutive random characters". Is this what you want?

Download 2025-10-12_A_Random_Characters.mw

You can do this .

evalc(D11)

To get real part only.

evalc(Re(D11))

Or imaginary part only.

evalc(Im(D11))

It i seasiest to use Equal fr0m the LlinearAlgebra package for this.

V1 := <2, 3, -7>;
                             [    2     ]
                             [          ]
                       V1 := [    3     ]
                             [          ]
                             [&uminus0;7]

V2 := <2, 3, -7>;
                             [    2     ]
                             [          ]
                       V2 := [    3     ]
                             [          ]
                             [&uminus0;7]

Equal(V1, V2);
                              true

The is something to do with how maple evaluates Vectors and Matrices.  delay evaluation quotes  '......'  help here. There may be nicer ways to do this though.

{'Matrix'([1])} union {'Matrix'([1])};
                         {Matrix([1])}

eval({'Matrix'([1])} union {'Matrix'([1])});
                             {[1]}

One of your simpler puzzles. 

Download 5-05-25_A_sums.mw

This works. Nothing fancy.

plot(rhs(sol_1),x=0.15..5)

If the file doesn't use new features it willl open with a warning that it was created in a newer version of Maple. It should run ok. I opened one from a 2025 answer earlier.

9/2=4.5   Gives a similar triangle to the yellow one

sqrt(4.5/2)=sqrt( 2.25)=1.5   square root of ratio of areas gives sides ratio

(1.5+1)^2*2=12.5 ( total ratio of side length to mid point)^2 times yellow area gives size of triangle to midpoint of side AD.

12.5+12.5-2 =23 (green area)  

For some reason I can't upload the worksheet.
It is just the 3,4,5 triangle.

restart

sph:=(x-3)^2+(y-7)^2+(z-4)^2-25

plxy:=z=0
plyz:=x=0
ctr:=[3,7,4]
R:=5
ctrplxy:=[3,7,0]
4^2+Rxy^2=5^2
fsolve( ?? );
Rxy:=3
ctrplyz:=[0,7,4]
3^2+Ryz^2=5^2

fsolve( ?? );
Ryz:=4
#Center  and Radius on xy plane
ctrplxy;
Rxy
#Center  and Radius on yz plane
ctrplyz;
Ryz

This is just a quick test. I drew it in a CAD system to see. And  another possible assumption is the side slopes are equal.