function printDiagram(E11::Array, E12::Array, case::Int64)
  name = ""
  msg1 = ""
  msg2 = ""

  if case == 0
    name = "1"
    msg1 = " mean number 1_1"
    msg2 = " mean number 1_2"
  elseif case == 1
    msg1 = " mean number 2_1"
    msg2 = " mean number 2_2"
  elseif case == 2
    msg = " mean number 3"
  end
  x1 = 1:10:N

  fig, ax = subplots()
  suptitle("Zad2")
  ax[:plot](x, E11, linewidth=2, alpha=0.6, label="Expected value of$msg1")
  ax[:plot](x, E12, linewidth=2, alpha=0.6, label="Expected value of$msg2", linestyle="--")
  ax[:legend]()
  fileName = string("lab4_2_$name.png")
end