Мова програмування Pascal. Оператор вибору case.

В яких випадках використовується оператор вибору case?

Виконання оператора вибору починається з:

Що означає вираз [else <оператор>;]

Яким буде результат виконання фрагменту програми для N=3:

 Case N of 

  1,2,12 : WriteLn('Зима'); 

  3,4,5: WriteLn('Весна');

  6,7,8: WriteLn('Літо');

  9,10,11: WriteLn('Осінь'); 

  else  WriteLn ('Неправильний номер місяця');

 End;

Яким буде результат виконання фрагменту програми для N=6:

Case N of 

  1, 2, 3, 4, 5 : WriteLn('Робочий день'); 

  6, 7 : WriteLn('Вихідний день');

  else 

  WriteLn('Неправильний день тижня') ; 

 End;

Яким буде результат виконання фрагменту програми при N=10:

 Case N of

  1,2,3,4,5: WriteLn ('Робочий день');

   6,7: WriteLn ('Вихідний день');

    Else WriteLn ('Неправильний день тижня')

 End;

Яким буде результат виконання фрагменту програми при N=5:

 Case N of

  1, 2, 3 : WriteLn('Потрібно навчатись краще!');

  4, 5, 6 : WriteLn('Намагайся працювати краще!');

  7, 8, 9 : WriteLn('Це вже не погано!');

  10, 11, 12 : WriteLn('Молодець!');

   Else WriteLn('Такої оцінки не має!')

 End; 

Яким буде результат виконання фрагменту програми при N=13:

 Case N of

  1, 2, 3: WriteLn('Потрібно навчатись краще!');

  4, 5, 6: WriteLn('Намагайся працювати краще!');

  7, 8, 9: WriteLn('Це вже не погано!');

  10, 11, 12: WriteLn('Молодець!');

   Else WriteLn('Такої оцінки не має!')

 End; 

Чому дорівнює А після виконання оператора, якщо початкове значення А = 18?

   Case А mod 10 of

   0..3 : A := A*2;

   3..5 : A := A+10;

   6..9 : A := A*10;

   end;

Чому дорівнює А після виконання оператора, якщо початкове значення А = 22?

   Case А div 10 of

   0..3 : A := A*2;

   3..5 : A := A+10;

   6..9 : A := A*10;

   end;