結果

問題 No.1988 Divisor Tiling
ユーザー siman
提出日時 2022-06-30 16:24:25
言語 Ruby
(3.4.1)
結果
AC  
実行時間 116 ms / 2,000 ms
コード長 864 bytes
コンパイル時間 164 ms
コンパイル使用メモリ 7,552 KB
実行使用メモリ 13,184 KB
最終ジャッジ日時 2024-11-24 12:55:01
合計ジャッジ時間 6,245 ms
ジャッジサーバーID
(参考情報)
judge2 / judge4
このコードへのチャレンジ
(要ログイン)
ファイルパターン 結果
sample AC * 2
other AC * 32
権限があれば一括ダウンロードができます
コンパイルメッセージ
Main.rb:18: warning: ambiguous first argument; put parentheses or a space even after `-' operator
Syntax OK

ソースコード

diff #
プレゼンテーションモードにする

class Integer
def divisor_list
require 'prime'
return [] if self <= 0
return [1] if self == 1
prime_division.map.with_index { |(base, k), i|
s = i.zero? ? 0 : 1
(s..k).map { |n| base ** n }
}.inject { |res, e| res + res.flat_map { |t| e.map { |v| t * v } } }.sort
end
end
N, H = gets.split.map(&:to_i)
if N % H != 0
puts -1
exit
end
W = N / H
height, width = [H, W].sort
ans = Array.new(height) { Array.new(width, 0) }
y = 0
x = 0
N.divisor_list.reverse_each do |v|
next if v == N
h = v / width
w = v % width
if h > 0
y.upto(y + h - 1) do |cy|
0.upto(width - 1) do |cx|
ans[cy][cx] = v
end
end
else
w.times do
ans[y][x] = v
x += 1
end
end
if h > 0
y += h
x = 0
end
end
if H > W
ans = ans.transpose
end
puts ans.map { |row| row.join(' ') }
הההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההההה
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
0