Skip to main content
Commonmark migration
Source Link

##Mathematica, 60 bytes

Mathematica, 60 bytes

NumberForm[t/.NSolve[Sin[t/180Pi]==#&&#2<=t<=#3,{t}],{9,3}]&

input

[0, -1080, 1080]

output

{-1080.000,-900.000,-720.000,-540.000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000,1080.000}

##Mathematica, 60 bytes

NumberForm[t/.NSolve[Sin[t/180Pi]==#&&#2<=t<=#3,{t}],{9,3}]&

input

[0, -1080, 1080]

output

{-1080.000,-900.000,-720.000,-540.000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000,1080.000}

Mathematica, 60 bytes

NumberForm[t/.NSolve[Sin[t/180Pi]==#&&#2<=t<=#3,{t}],{9,3}]&

input

[0, -1080, 1080]

output

{-1080.000,-900.000,-720.000,-540.000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000,1080.000}

added 14 characters in body
Source Link
ZaMoC
  • 24.9k
  • 2
  • 30
  • 81

##Mathematica, 6560 bytes

NumberForm[t/.NSolve[Sin[t Degree]==#&&#2<t<#3/180Pi]==#&&#2<=t<=#3,{t},Reals]],{9,3}]&

input

[0, -1080, 1080]

output

{-1080.000,-900.000,-720.000,-540.000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000,1080.000}

##Mathematica, 65 bytes

NumberForm[t/.NSolve[Sin[t Degree]==#&&#2<t<#3,{t},Reals],{9,3}]&

input

[0, -1080, 1080]

output

{-900.000,-720.000,-540.000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000}

##Mathematica, 60 bytes

NumberForm[t/.NSolve[Sin[t/180Pi]==#&&#2<=t<=#3,{t}],{9,3}]&

input

[0, -1080, 1080]

output

{-1080.000,-900.000,-720.000,-540.000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000,1080.000}

added 8 characters in body
Source Link
ZaMoC
  • 24.9k
  • 2
  • 30
  • 81

##Mathematica, 5765 bytes

NumberForm[t/.NSolve[Sin@t==#&&#2<t<#3NSolve[Sin[t Degree]==#&&#2<t<#3,{t},Reals],{9,3}]&

input

[0.5, 2-1080, 10]1080]

output

{2-900.618000, 6-720.807000, 8-540.901000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000}

edit

3 decimal places fixed

##Mathematica, 57 bytes

NumberForm[t/.NSolve[Sin@t==#&&#2<t<#3,{t},Reals],{9,3}]&

input

[0.5, 2, 10]

output

{2.618, 6.807, 8.901}

edit

3 decimal places fixed

##Mathematica, 65 bytes

NumberForm[t/.NSolve[Sin[t Degree]==#&&#2<t<#3,{t},Reals],{9,3}]&

input

[0, -1080, 1080]

output

{-900.000,-720.000,-540.000,-360.000,-180.000,0.000,180.000,360.000,540.000,720.000,900.000}

added 14 characters in body
Source Link
ZaMoC
  • 24.9k
  • 2
  • 30
  • 81
Loading
Source Link
ZaMoC
  • 24.9k
  • 2
  • 30
  • 81
Loading