Skip to main content
deleted 10 characters in body
Source Link
Timtech
  • 12.6k
  • 2
  • 46
  • 61

TI-Basic (8383/84 version), 40 bytes

Input A:For(I,A,2,~1:A+(AfPart(I/2)-1)I(1>IfPart(A/I->A:End:A

Information about TI-Basic

TI-Basic (83/84 version), 40 bytes

Input A:For(I,A,2,~1:A+(AfPart(I/2)-1)I(1>IfPart(A/I->A:End:A

Information about TI-Basic

TI-Basic 83/84, 40 bytes

Input A:For(I,A,2,~1:A+(AfPart(I/2)-1)I(1>IfPart(A/I->A:End:A

Information about TI-Basic

fix headline for leaderboard
Source Link
Martin Ender
  • 197.2k
  • 67
  • 447
  • 975

#TI-Basic (83/84 version) - 40 bytes

TI-Basic (83/84 version), 40 bytes

Input A:For(I,A,2,~1:A+(AfPart(I/2)-1)I(1>IfPart(A/I->A:End:A

Information about TI-Basic

#TI-Basic (83/84 version) - 40 bytes

Input A:For(I,A,2,~1:A+(AfPart(I/2)-1)I(1>IfPart(A/I->A:End:A

TI-Basic (83/84 version), 40 bytes

Input A:For(I,A,2,~1:A+(AfPart(I/2)-1)I(1>IfPart(A/I->A:End:A

Information about TI-Basic

Source Link
Timtech
  • 12.6k
  • 2
  • 46
  • 61

#TI-Basic (83/84 version) - 40 bytes

Input A:For(I,A,2,~1:A+(AfPart(I/2)-1)I(1>IfPart(A/I->A:End:A