#!/usr/local/bin/ruby
question=[]
answer=[]
n = 0
begin
  open("quiz.dat", "r") do |q|
    while line=q.gets
      question[n] = line.chomp
      answer[n] = q.gets.chomp
      n+=1
    end
  end
rescue
  STDERR.puts "quiz.datに問題&解答集を用意してね"
  exit(0)
end

# シャッフルする
srand()
i=0
while i<question.length
  t=rand(question.length)
  # まず、question[i]とquestion[t]を交換
  tmp=question[i]
  question[i] = question[t]
  question[t] = tmp
  # answer[i]とanswer[t]を交換
  tmp=answer[i]
  answer[i] = answer[t]
  answer[t] = tmp
  i+=1
end

i=0
while i<n
  printf("問題: %s(答を見るには[Return])\n", question[i])
  gets				# [Return]で先に進む
  printf("答: %s\n", answer[i])
  i+=1
end