Yet another solution with defined names:
Array ={1;2;3;4;5;6;7;8;9;10}
Square =3*Array*(Array-1)
Luka =MAX(Square*(Square<=$A$1))
Lukb =60/MAX(Array*(Square<=$A$1))
B1 =($A$1-Luka)*Lukb