Skip to main content
Commonmark migration
Source Link

##APL 21 20##

APL 21 20

Takes screen input via ←⎕

(×/(+/t÷2)-0,t←⎕)*.5 

##APL 21 20##

Takes screen input via ←⎕

(×/(+/t÷2)-0,t←⎕)*.5 

APL 21 20

Takes screen input via ←⎕

(×/(+/t÷2)-0,t←⎕)*.5 
Reduced byte count
Source Link
Graham
  • 7.8k
  • 1
  • 15
  • 13

##APL 21##21 20##

Takes screen input via ←⎕

(×/(.5×++/tt÷2)-0,t←⎕)*.5 

##APL 21##

Takes screen input via ←⎕

(×/(.5×+/t)-0,t←⎕)*.5 

##APL 21 20##

Takes screen input via ←⎕

(×/(+/t÷2)-0,t←⎕)*.5 
Source Link
Graham
  • 7.8k
  • 1
  • 15
  • 13

##APL 21##

Takes screen input via ←⎕

(×/(.5×+/t)-0,t←⎕)*.5