Skip to main content
We’ve updated our Terms of Service. A new AI Addendum clarifies how Stack Overflow utilizes AI interactions.
Code Golf

Return to Answer

scored the TI-Basic code correctly (by tokens)
Source Link
Timtech
  • 12.7k
  • 2
  • 46
  • 63

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (54 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (143 (削除) 185 (削除ここまで))

enum R{R;{int a=0,b=0,c,i=2;for(;(c=new java.util.Scanner(System.in).nextInt()+b*--i)+i>=c;b=c)a+=c*i;c/=b-a;System.out.print(c+" "+(b-a*c));}}


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (4125 (削除) 41 (削除ここまで))

:Prompt A,B,C
:(C-B)/(B-A→MA
:Disp MAns,B-A*MAAns

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (54 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (143 (削除) 185 (削除ここまで))

enum R{R;{int a=0,b=0,c,i=2;for(;(c=new java.util.Scanner(System.in).nextInt()+b*--i)+i>=c;b=c)a+=c*i;c/=b-a;System.out.print(c+" "+(b-a*c));}}


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (41)

:Prompt A,B,C
:(C-B)/(B-A→M
:Disp M,B-A*M

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (54 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (143 (削除) 185 (削除ここまで))

enum R{R;{int a=0,b=0,c,i=2;for(;(c=new java.util.Scanner(System.in).nextInt()+b*--i)+i>=c;b=c)a+=c*i;c/=b-a;System.out.print(c+" "+(b-a*c));}}


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (25 (削除) 41 (削除ここまで))

:Prompt A,B,C
:(C-B)/(B-A
:Disp Ans,B-AAns

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

update Java solution
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (54 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (185143 (削除) 185 (削除ここまで))

import java.util.*;classenum R{public static void main(String[] m)R;{Scannerint s=newa=0,b=0,c,i=2;for(;(c=new java.util.Scanner(System.in);int a=s.nextInt(),b=s.nextInt(+b*--i),c=s.nextInt(+i>=c;b=c)-b;ca+=c*i;c/=b-a;System.out.print(c+" "+(b-a*c));}}

Demo: http://ideone.com/Lltzh

Note that ideone requires the java class name to be Main, but that is the only difference between the demo code and my solution.


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (41)

:Prompt A,B,C
:(C-B)/(B-A→M
:Disp M,B-A*M

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (54 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (185)

import java.util.*;class R{public static void main(String[] m){Scanner s=new Scanner(System.in);int a=s.nextInt(),b=s.nextInt(),c=s.nextInt()-b;c/=b-a;System.out.print(c+" "+(b-a*c));}}

Demo: http://ideone.com/Lltzh

Note that ideone requires the java class name to be Main, but that is the only difference between the demo code and my solution.


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (41)

:Prompt A,B,C
:(C-B)/(B-A→M
:Disp M,B-A*M

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (54 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (143 (削除) 185 (削除ここまで))

enum R{R;{int a=0,b=0,c,i=2;for(;(c=new java.util.Scanner(System.in).nextInt()+b*--i)+i>=c;b=c)a+=c*i;c/=b-a;System.out.print(c+" "+(b-a*c));}}


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (41)

:Prompt A,B,C
:(C-B)/(B-A→M
:Disp M,B-A*M

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

Remove obvious extra space from DOS/BATCH solution
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (5554 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (185)

import java.util.*;class R{public static void main(String[] m){Scanner s=new Scanner(System.in);int a=s.nextInt(),b=s.nextInt(),c=s.nextInt()-b;c/=b-a;System.out.print(c+" "+(b-a*c));}}

Demo: http://ideone.com/Lltzh

Note that ideone requires the java class name to be Main, but that is the only difference between the demo code and my solution.


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (41)

:Prompt A,B,C
:(C-B)/(B-A→M
:Disp M,B-A*M

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (55)

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (185)

import java.util.*;class R{public static void main(String[] m){Scanner s=new Scanner(System.in);int a=s.nextInt(),b=s.nextInt(),c=s.nextInt()-b;c/=b-a;System.out.print(c+" "+(b-a*c));}}

Demo: http://ideone.com/Lltzh

Note that ideone requires the java class name to be Main, but that is the only difference between the demo code and my solution.


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (41)

:Prompt A,B,C
:(C-B)/(B-A→M
:Disp M,B-A*M

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

AWK (32)

{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}

Demo: http://ideone.com/kp0Dj


bash (38)

awk '{m=3ドル-2ドル;print m/=2ドル-1,ドル2ドル-1ドル*m}'

Demo: http://ideone.com/tzFi8


DOS/BATCH (54 (削除) 55 (削除ここまで))

set/a m=(%3-%2)/(%2-%1)&set/a n=%2-%m%*%1&echo %m% %n%

Takes parameters as space-separated list of arguments.


Java (185)

import java.util.*;class R{public static void main(String[] m){Scanner s=new Scanner(System.in);int a=s.nextInt(),b=s.nextInt(),c=s.nextInt()-b;c/=b-a;System.out.print(c+" "+(b-a*c));}}

Demo: http://ideone.com/Lltzh

Note that ideone requires the java class name to be Main, but that is the only difference between the demo code and my solution.


JavaScript (48 (削除) 61 (削除ここまで) (削除) 67 (削除ここまで))

p=prompt;m=p(b=p(a=p()))-b;alert([m/=b-a,b-a*m])

​ Demo: http://jsfiddle.net/BT8bB/6/


PHP (61 (削除) 77 (削除ここまで))

<?list(,$a,$b,$c)=$argv;$c-=$b;echo($c/=$b-$a).' '.$b-=$c*$a;

Demo: http://ideone.com/CEgke


QBasic (34)

INPUT a,b,c
m=(c-b)/(b-a)
?m;b-m*a

TI-83 Basic (41)

:Prompt A,B,C
:(C-B)/(B-A→M
:Disp M,B-A*M

Yes, the missing right parenthesis is on purpose. It's a well-known optimization technique that closing the parentheses before a STO operation is not necessary in TI-83 Basic programming.

Shorten PHP solution
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
revert back to 48-char javascript solution, my optimization only works in Chrome
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
add DOS/BATCH solution
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
remove score board, it's in OP now.
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
add scoreboard
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
add Java solution
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
add bash, remove C
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
add AWK, resort languages
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
update JavaScript, add C
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
added 77 characters in body
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
added 139 characters in body
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
add TI-83 Basic
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
added 10 characters in body
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
added 17 characters in body
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading
Source Link
mellamokb
  • 6.1k
  • 3
  • 28
  • 34
Loading

AltStyle によって変換されたページ (->オリジナル) /