"카타 7급 Rotate for a Max"의 두 판 사이의 차이

잔글 (봇: 자동으로 텍스트 교체 (-</source> +</syntaxhighlight>, -<source +<syntaxhighlight ))
 
1번째 줄: 1번째 줄:
==Kotlin==
==Kotlin==
{{카타|7급|Kotlin|3}}
{{카타|7급|Kotlin|3}}
<source lang='kotlin'>
<syntaxhighlight lang='kotlin'>
</source>
</syntaxhighlight>
<source lang='kotlin'>
<syntaxhighlight lang='kotlin'>
</source>
</syntaxhighlight>
<source lang='kotlin'>
<syntaxhighlight lang='kotlin'>
</source>
</syntaxhighlight>


==R==
==R==
{{카타|7급|R|3}}
{{카타|7급|R|3}}
<source lang='r'>
<syntaxhighlight lang='r'>
maxRot <- function(n) {
maxRot <- function(n) {
   max = n = as.character(n)
   max = n = as.character(n)
20번째 줄: 20번째 줄:
   as.numeric(max)
   as.numeric(max)
}
}
</source>
</syntaxhighlight>

2020년 11월 2일 (월) 02:55 기준 최신판

1 Kotlin[ | ]

2 R[ | ]

maxRot <- function(n) {
  max = n = as.character(n)
  l = nchar(n)
  for( i in 1:l-1 ) {
    n = paste( substr(n,0,i-1), substr(n,i+1,l), substr(n,i,i), sep="" )
    if( n > max ) max = n
  }
  as.numeric(max)
}
문서 댓글 ({{ doc_comments.length }})
{{ comment.name }} {{ comment.created | snstime }}