利用IDL编写以下代码1、(case） 输入一到十二月的任意一个月份的数字，输出该月份的英文单词 2、(switch) 输入学生成绩等级，如果是a b c d,输出"score大于等于60,",最后输出“通过考试",输入的是e,则输出“score小于60”,"没有通过考试" 3、(while) 计算1+2+3+.....+1000。 4、(break） 要求从键盘任意输入两个数求和，然后询问是否执行操作，执行则计算，不执行则跳出。 5、(repeat) 要求从键盘任意输入两个数求乘积，然后询问是否重复操作，直到输入N结束。 6、(if) 计算并输出y的值，其中x的值要求从健盘任意输人，程序如下

1、

pro month
   month = dialog_pick('请输入月份：', /integer, title='月份选择')
   case month of
      1: print, 'January'
      2: print, 'February'
      3: print, 'March'
      4: print, 'April'
      5: print, 'May'
      6: print, 'June'
      7: print, 'July'
      8: print, 'August'
      9: print, 'September'
      10: print, 'October'
      11: print, 'November'
      12: print, 'December'
      else: print, '输入错误，请输入1-12之间的整数'
   endcase
end

2、

pro score
   grade = dialog_pick('请输入成绩等级：', /string, title='成绩等级')
   switch (string(grade)) do case
      'a', 'A', 'b', 'B', 'c', 'C', 'd', 'D': begin
         print, 'score大于等于60,'
         print, '通过考试'
      end
      'e', 'E': begin
         print, 'score小于60,'
         print, '没有通过考试'
      end
      else: print, '输入错误，请输入a、b、c、d、e等级'
   endswitch
end

3、

pro sum
   i = 1
   sum = 0
   while (i le 1000) do begin
      sum += i
      i++
   endwhile
   print, '1+2+3+...+1000=', sum
end

4、

pro add
   num1 = dialog_pick('请输入第一个整数：', /integer, title='输入整数')
   num2 = dialog_pick('请输入第二个整数：', /integer, title='输入整数')
   choice = dialog_pick('是否执行操作？', /string, title='选择操作', buttons=['Y', 'N'])
   if (choice eq 'Y' or choice eq 'y') then begin
      sum = num1 + num2
      print, num1, '+', num2, '=', sum
   endif
end

5、

pro product
   repeat begin
      num1 = dialog_pick('请输入第一个整数：', /integer, title='输入整数')
      num2 = dialog_pick('请输入第二个整数：', /integer, title='输入整数')
      product = num1 * num2
      print, num1, '*', num2, '=', product
      choice = dialog_pick('是否重复操作？', /string, title='选择操作', buttons=['Y', 'N'])
   endrep while (choice eq 'Y' or choice eq 'y')
end

6、

pro calculate
   x = dialog_pick('请输入x的值：', /integer, title='输入整数')
   if (x lt 0) then begin
      y = -1
   endif else if (x eq 0) then begin
      y = 0
   endif else if (x gt 0 and x lt 10) then begin
      y = 1
   endif else begin
      y = 2
   endelse
   print, 'y=', y
end