Trong thử thách này, bạn phải lấy hai số (cách nhau bởi một khoảng trắng) làm đầu vào và đầu ra một tam giác vuông ASCII, được tạo thành từ xs.

Số đầu tiên sẽ là chiều rộng và chiều cao của hình tam giác bạn nên xuất ra. Số thứ hai sẽ là góc nào góc bên phải sẽ nằm trong. Các góc được đánh số từ 1 đến 4, bắt đầu từ trên cùng bên trái và đi theo thứ tự đọc tiếng Anh:

1    2



3    4

Ví dụ: (đầu vào và đầu ra tam giác tương ứng của chúng):

INPUT | 3 1 | 3 2 | 3 3 | 3 4
------+-----+-----+-----+----
 OUT- | xxx | xxx | x   |   x
 PUT  | xx  |  xx | xx  |  xx
      | x   |   x | xxx | xxx

Đầu ra của chương trình của bạn phải khớp chính xác các ví dụ này với các đầu vào tương ứng của chúng.

Đầu vào sẽ luôn hợp lệ: số thứ nhất sẽ là số nguyên ≥1 và số thứ hai sẽ là 1, 2, 3 hoặc 4.

Đây là môn đánh gôn ; mã ngắn nhất (tính theo số ký tự) sẽ thắng.

APL (30)

{' x'[1+(⍎⍵⌷'⌽+⍉⊖')≤/¨⍳2⍴⍺]}/⎕

Giải trình:

• {... }/⎕: giảm hàm đã cho so với đầu vào (vì vậy nếu đầu vào có 2 số, chỉ cần gọi hàm với hai số đó, ⍺là số bên trái và ⍵số bên phải)
• ≤/¨⍳2⍴⍺: Tạo ma trận tọa độ ⍺-by- ⍺và đặt các vị trí trong đó tọa độ X không lớn hơn tọa độ Y, tạo ra một trường bit.
• (⍎⍵⌷'⌽+⍉⊖'): chọn một hàm biến đổi được đưa ra bằng cách ⍵đặt tam giác sang phải.
• ' x'[1+... ]: thêm một vào bitfield và sử dụng kết quả làm chỉ mục vào chuỗi ' x', do đó, đặt khoảng trắng cho 0 và xcho 1.

Ruby, 116 115 109 96

Tôi sẽ bắt đầu với giải pháp của riêng tôi.

i=gets.split
s=i[0].to_i
(i[1]<?3?s.downto(1):1..s).map{|x|t=?x*x
puts /2|4/=~i[1]?t.rjust(s):t}

Tôi chỉ biết rằng tôi sẽ bị đánh bại bởi một giải pháp GolfScript 30 ký tự gần như ngay lập tức: P

Cảm ơn minitech đã cạo sạch 19 ký tự (wow)!

GolfScript ( 34 33 ký tự)

~\:^,{)' x'^*$>^<0(2$?%}%\(2&(%n*

Thật xấu hổ khi các góc không được đánh số theo vòng quay, bởi vì điều đó sẽ cho phép một cách tiếp cận thanh lịch hơn trong việc xây dựng một mảng và sau đó xoay vòng nthời gian:

~\:^,{)' x'^*$>^<}%{-1%zip}@)*n*

C # - 195

using System;class P{static void Main(string[]a){int G=int.Parse(
a[0]),O=int.Parse(a[1]),L=O<3?0:G+1,F=O<3?-G:1;G=O%2>0?-G:G;for(;
F<L;F++)Console.Write("{0,"+G+"}\n","".PadRight(F<0?-F:F,'x'));}}

Định dạng:

using System;
class P
{
    static void Main(string[] a)
    {
        int G = int.Parse(a[0]),
            O = int.Parse(a[1]),
            L = O < 3 ? 0 : G + 1,
            F = O < 3 ? -G : 1;

        G = O % 2 > 0 ? -G : G;

        for(; F < L; F++)
            Console.Write("{0," + G + "}\n", "".PadRight(F < 0 ? -F : F, 'x'));
    }
}

Golf, 39 36 35 ký tự

~\:y,{' '*'x'y*+y<0~2$?%}%-1@2>?%n*

bản demo trực tiếp: http://golfscript.apphb.com/?c=OyczIDInCn5cOnkseycgJyoneCd5Kit5PC0xIDIkPyV9JS0xQDI%2BPyVuKgo%3D

quá tệ, không phải 30 ký tự như yêu cầu

Toán học 122 (104?)

g@s_ := ({w, p} = ToExpression@StringSplit@s; 
   Array[If[Switch[p, 1, # <= (w + 1 - #2), 2, # <= #2, 3, # >= #2, 4, # > (w - #2)],
   "X", ""] &, {w, w}]) // Grid

GraphicsGrid[{{g["12 1"], g["12 3"]}}]

Theo cách giải thích tự do về "đầu ra", các ký tự sau (104 ký tự) sẽ hoạt động.

f@s_ := ({w, p} = ToExpression@StringSplit@s; 
  Graphics[Polygon@Delete[{{w, 0}, {0, 0}, {w, w}, {0, w}}, p], Axes -> True])


f["50 4"]

Nếu đầu vào ở dạng danh sách được cho phép, thì (75 ký tự) sau đây sẽ đủ:

f[{w_, p_}] := 
 Graphics[Polygon@Delete[{{w, 0}, {0, 0}, {w, w}, {0, w}}, p], Axes -> True]

J, 59 55 42 38 37 36 ký tự

Nếu nó được phép có đầu vào vào cuối chương trình:

(|:@|.@]^:([:|[+_7*2<[)[:[\'x'$~])~/

Nếu không (thêm 3 ký tự):

t=.(|:@|.@]^:([:|[+_7*2<[)[:[\'x'$~])~/

Sử dụng:

   (|:@|.@]^:([:|[+_7*2<[)[:[\'x'$~])~/3 4
  x
 xx
xxx

hoặc là

   t 3 4
  x
 xx
xxx

Tôi nghĩ rằng điều này có thể ngắn hơn một chút vì hầu hết các ký tự là dấu ngoặc và mũ để giữ nó theo kiểu ẩn.

Chỉnh sửa
Sử dụng một gerund và động từ chương trình nghị sự đã cắt bớt một vài ký tự, nhưng vẫn còn quá nhiều mũ trong đó theo ý thích của tôi.

Chỉnh sửa 2
Đó là một chút giống như nó. Việc bỏ chương trình nghị sự cho một danh sách có bao nhiêu phép quay được yêu cầu loại bỏ hầu hết các dấu ngoặc phụ và một vài chữ hoa.

Chỉnh sửa 3
Loại bỏ nắp không liên tục cuối cùng và một cặp dấu ngoặc trong quy trình. Cần tìm một cách mã hóa rẻ hơn số lần quay cần thiết.

Chỉnh sửa 4 Sử dụng tiền tố thay vì hậu tố để cắt bỏ một ký tự. Cho phép một cách khác để tạo danh sách mà không lưu bất kỳ ký tự nào. Bugger.

Chỉnh sửa 5
Sử dụng công thức để cắt bỏ một ký tự khác. Vẫn cảm thấy bit này có thể ngắn hơn.

Nhân vật Python 106

w,d=map(int,raw_input().split())
for e in range(1,w+1)[::d/3*2-1]:print('%'+'-+'[d%2]+str(w)+'s')%('*'*e)

Trăn 3, 91

Dựa trên câu trả lời của Abhijit.

Sửa đổi việc tạo chuỗi đầu ra để tránh tổng chuỗi và 1s xấu trong range. Python 3 được loại bỏ raw_trong raw_input, nhưng cần thiết để sử dụng //cho phép chia số nguyên và thêm parantheses cho print, để chỉ lưu một ký tự.

w,d=map(int,input().split())
for e in range(w)[::d//3*2-1]:print('%*s'%(w-d%2*2*w,'x'*-~e))

Mèo con , 140

def s{><replicate}
getLine{' 'neChar}span{readInt fromSome}toBoth->{w n}
w 0 if(n 2>){><}..
{<>w>< -{'X's}{' 's}both if(n 2%0=){><}cat say}each

Ung dung:

getLine
{' ' neChar} span
{readInt fromSome} toBoth
->{ width corner }

width 0
if (corner 2 >):
  swap
..

{ ->index
  'X' index replicate
  ' ' (width index -) replicate
  if (corner 2 % 0 =):
    swap
  cat say
} each

Bằng chứng là tôi cần triển khai quá tải và đưa ra thư viện chuẩn.