Euler_Problem-028 (old) (super-short).b93

v
 0000000
 0#####0
 0#####0
 0#####0
 0#####0
 0#####0
 0000000
                             
                                v                     -1  pg04g03:<
> 5 10p  >210g+30p240p 10g:*  > > 30g1-30p            30g40gg"#"-!|
                                v                     p03+1g03    <
                               
                                v                     -1  pg04g03:<
                                > 40g1+40p            30g40gg"#"-!|
                                v                     p04-1g04    <
                               
                                v                     -1  pg04g03:<
                                > 30g1+30p            30g40gg"#"-!|
                                v                     p03-1g03    <
                               
                                v                     -1  pg04g03:<
                                > 40g1-40p            30g40gg"#"-!|
                              | <  :                 p04+1g04     <
v                             <

                                    >v
>250p110g+60p    >0  >50g50gg: "0"- |> 60g50gg ++ 50g1+50p 60g1-60p  v
                                    > $ 1- . @
                     ^                                               <
[1,0] Width (101)

[3,0] X
[4,0] Y

[5,0] X/Y
[6,0] x_2

// Prog Solution 682044
// Real SOlution 692101