require 'cgi'
cgi = CGI::new("html4Tr")

class Odpoved
  attr_accessor textOdpovede
  
  def initialize(textOdpovede)
    @textOdpovede = textOdpovede
    pocetHlasov = 0
  end

  def hlasuj()
    pocetHlasov = pocetHlasov + 1
  end
end

class Anketa
  attr_accessor :otazka
  
  def initialize(otazka)
    @otazka = otazka
    moznosti = []
  end

  def najviacHlasov
    if moznosti != nil then
      result = moznosti[0]
      moznosti.each do |i|
        if i.hlasy > result.hlasy
          result = i
        end
      end
    end
    return result
  end

  def vypis
    spolu = celkovyPocet
    moznosti.each do |i|
      cgi.out{cgi.Checkbox(i.textOdpovede,i.moznosti,false) + cgi.br}
    end
  end

  def celkovyPocet
    result = 0
    moznosti.each do |i|
      result += i.moznosti
    end
    return result
  end
end


ankety = []

ankety[0] = Anketa.new("Aka je tato anketa?")
ankety[0].moznosti[0] = Odpoved.new("Vyborna")
ankety[0].moznosti[1] = Odpoved.new("Velmi dobra")
ankety[0].moznosti[2] = Odpoved.new("Dobra")
ankety[0].moznosti[3] = Odpoved.new("Neviem")
ankety[1] = Anketa.new("Ake rozlisenie ma Vas monitor?")
ankety[1].moznosti[0] = Odpoved.new("15-19 palcov")
ankety[1].moznosti[1] = Odpoved.new("Viac ako 19 palcov")

0.times {ankety[0].moznosti[0].hlasuj()}  
0.times {ankety[0].moznosti[1].hlasuj()}  
0.times {ankety[0].moznosti[2].hlasuj()}  
5.times {ankety[0].moznosti[3].hlasuj()}  
0.times {ankety[1].moznosti[0].hlasuj()} 
3.times {ankety[1].moznosti[1].hlasuj()} 

cgi.out{cgi.html{cgi.body}}
ankety.each do |i|
  cgi.out{cgi.h6(i.otazka) + cgi.br}
  i.vypis
  cgi.out{"Celkovy pocet hlasov: " + i.celkovyPocet.to_s + cgi.br}
  cgi.out{"Najvyssi pocet hlasov je: " + i.najviacHlasov.text + cgi.br + cgi.br}
  cgi.out{cgi.Submit + cgi.br}
end