Với địa hình của đất ở định dạng hình ảnh ASCII, hãy tìm ra nơi các hồ sẽ đi và lấp chúng vào. Giả sử lượng mưa vô hạn.

thí dụ

đầu vào

         #               
         ##              
      # ####             
#    #########           
##  ###########          
## #############   ####  
## ##############  ##### 
################# #######
#########################
#########################

đầu ra

         #               
         ##              
      #@####             
#@@@@#########           
##@@###########          
##@#############@@@####  
##@##############@@##### 
#################@#######
#########################
#########################

Đầu vào sẽ chỉ chứa khoảng trắng và #dấu. Mỗi dòng sẽ có cùng độ dài. Đầu ra phải là #mô hình giống hệt nhau với các không gian nơi nước sẽ tích tụ đầy @dấu.

Hàng đầu vào phía dưới sẽ luôn là tất cả các dấu #. Sẽ không có lỗ hoặc nhô ra trong đất. Mã ngắn nhất sẽ thắng.

sed -r, 27 24 (27 với -r)

24 (27):

:;s/(#|@) ( *#)/\1@\2/;t

27 (30):

:e;s/([#@]) ( *#)/\1@\2/;te

Soạn thảo với hai giải pháp perl tốt hơn

Perl, 25

s/# +#/$_=$&;y| |@|;$_/ge

Perl (> = v5.9.5), 24 ký tự

Chạy với perl -p:

1while s/#.*\K (?=\S)/@/

Điều này đòi hỏi Perl 5.9.5 trở lên để sử dụng lối thoát đặc biệt \K.

Windows PowerShell, 36 74 138

$input-replace'(?<!^ *) (?! *$)','@'

Võng mạc , 10 byte

Retina là (nhiều) mới hơn so với thách thức này. Nhưng giải pháp này quá gọn gàng để không đăng nó:

T` `@`#.*#

Hãy thử trực tuyến.

Đây chỉ đơn giản là một giai đoạn chuyển ngữ thay thế các khoảng trắng @, nhưng thao tác bị giới hạn ở các kết quả khớp #.*#, tức là các ký tự được bao quanh bởi đất ở cả hai bên.

Ruby 1.8, 30 ký tự

#!ruby -p
gsub(/# +#/){$&.tr" ","@"}

Nếu bất cứ ai có ý tưởng tại sao điều này không hoạt động trong Ruby 1.9 (được thử nghiệm với 1.9.2p0 và 1.9.2p204), mặc dù tài liệu nói rằng nó sẽ hoạt động , hãy cho tôi biết!

Python, 95 92 byte

for s in S.split('\n'):b=s.find('#');e=s.rfind('#');print s[:b]+s[b:e].replace(' ','@')+s[e:]

05AB1E , 17 16 byte

|εγć?D¨ð'@:sθJJ,

Hãy thử trực tuyến.

Giải trình:

|            # Take all input-lines as list
 ε           # For each line:
  γ          #  Split the line into chunks of consecutive equal characters
             #   i.e. " ##   # " → [' ','##','   ','#',' ']
   ć         #  Split into head and the rest of the list
             #   i.e. [' ','##','   ','#',' '] → ['##','   ','#',' '] and ' '
    ?        #  Print this head
   D         #  Duplicate the rest of the list
    ¨        #  Remove the last element
             #   i.e. ['##','   ','#',' '] → ['##','   ','#']
     ð'@:    #  Replace every space with a "@"
             #   i.e. ['##','   ','#'] → ['##','@@@','#']
     sθ      #  Swap so the duplicated list is at the top, and take the last item as is
             #   i.e. ['##','   ','#',' '] → ' '
         JJ  #  Join the lists and individual items in the list together to a single string
             #   i.e. ['##','@@@','#'] and ' ' → "##@@@# "
           , #  Print with trailing new-line

Javascript, 107 byte

var f=function(x){return x.replace(/# +#/g, function(x){return "#"+new Array(x.length-1).join("@")+"#";})};

Ung dung:

var f = function(x) {
    return x.replace(/# +#/g, function(x){
        return "#" + new Array(x.length - 1).join("@") + "#";
    })
};

Python, 108 106 92 byte

import re
n=1
while n: S,n=re.subn('# +#',lambda m:'#'+'@'*len(m.group(0)[2:])+'#',S)
print S

Thạch , 15 byte

Ỵ”@ẹ”#ṂrṀḟƲ$¦€Y

Hãy thử trực tuyến!

Đường ống , 15 byte

aR:`#.*#`_TRs'@

Đưa đầu vào dưới dạng một chuỗi nhiều dòng thông qua đối số dòng lệnh: Hãy thử trực tuyến! (Cách khác, chỉ định các -rncờ và thay đổi đầu tiên athành gvà bạn có thể cung cấp đầu vào qua stdin: Hãy thử trực tuyến! )

Ý tưởng tương tự như câu trả lời của Retina: thay thế mọi trận đấu của biểu thức chính quy #.*#bằng kết quả chuyển từ không gian thành @trong trận đấu. Pip không thể phù hợp với sự căng thẳng của Retina cho một vấn đề regex thuần túy - nhưng rốt cuộc, không phải hàng ngày bạn có thể ràng buộc với Jelly.