Оператор выбора CASE. Решение задач.

• 1 слайд

  Оператор выбора
  CASE.
  Решение задач.
  

• 2 слайд

  Оператор выбора CASE позволяет выбрать одно из нескольких возможных продолжений программы.
  Параметром, по которому осуществляется выбор, служит так называемый ключ выбора (или селектор) - выражение любого типа (кроме типов REAL и STRING)
  

• 3 слайд

  Общая форма записи следующая:
  case выражение of
  значение1 : оператор (группа операторов);
  значение2 : оператор (группа операторов);
  . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
  значениеN : оператор (группа операторов)
  else оператор (группа операторов);
  end;
  
  

• 4 слайд

  Может случиться, что в списке выбора не окажется константы равной вычисленному значению ключа. В этом случае управление передается оператору, стоящему за словом ELSE.
  
  
  case NUMBER mod 2 of
    0 : writeln (NUMBER, ‘- число четное‘)
  else : writeln (NUMBER, ‘- число нечетное‘);
  end;
  

• 5 слайд

  Если один оператор выполняется при нескольких значениях, то их можно перечислить через запятую.
  
  case MONTH of
    1, 2, 3 : writeln (‘Первый квартал‘);
    4, 5, 6 : writeln (‘Второй квартал‘);
    7, 8, 9 : writeln (‘Третий квартал‘);
    10, 11, 12 : writeln (‘Четвёртый квартал‘);
  end;
  

• 6 слайд

  Пример.
  Написать алгоритм, позволяющий получить словесное наименование школьных оценок.
  
  PROGRAM Example_CASE_1;
  USES: crt;
  VAR A : integer;
  BEGIN clrscr;
  Write(‘Введите оценку: ‘);
  Read(A);
      CASE A OF
          2 : Write(‘неудовлетворительно’);
          3 : Write(‘удовлетворительно’);
          4 : Write(‘хорошо’);
          5 : Write(‘отлично’)
          ELSE Write(‘Ошибка!’)
      END;
  While not keypressed do;
  END.
  
  

• 7 слайд

  Задача.
  
  Написать программу преобразования цифр в слова.(от 0 до 9)
  …..
  0 : writeln (‘ноль‘);
  1 : writeln (‘один‘);
  …..
  

• 8 слайд

  Проверяем!!!
  Program Number1;
  Var   a, b, c : integer; 
  Uses: crt;
  Begin
    writeln(‘Введите цифру ‘); 
    readln(a);
    if (a<0) or (a>9)
      then
        writeln (‘Это число не является цифрой‘)
      else
        case a of
          0 : writeln (‘ноль‘);
          1 : writeln (‘один‘);
          2 : writeln (‘два‘);
          3 : writeln (‘три‘);
          4 : writeln (‘четыре‘);
          5 : writeln (‘пять‘);
          6 : writeln (‘шесть‘);
          7 : writeln (‘семь‘);
          8 : writeln (‘восемь‘);
          9 : writeln (‘девять‘);
        end;
    readln;
  While not keypressed do;
  End.
  

• 9 слайд

  или второй вариант решения данной задачи
  Program Number2;
  Var a, b, c : integer; 
  Uses: crt;
  Begin
    writeln(‘Введите цифру ‘); 
    readln(a);
    case a of
      0 : writeln (‘ноль‘);
      1 : writeln (‘один‘);
      2 : writeln (‘два‘);
      3 : writeln (‘три‘);
      4 : writeln (‘четыре‘);
      5 : writeln (‘пять‘);
      6 : writeln (‘шесть‘);
      7 : writeln (‘семь‘);
      8 : writeln (‘восемь‘);
      9 : writeln (‘девять‘)
    else writeln (‘Это число не является цифрой‘);
    end;
    readln;
  While not keypressed do;
  End.
  

• 10 слайд

  Домашнее задание:
  1. По номеру дня недели вывести его название.
  
  2.Написать алгоритм, классифицирующий треугольники (остроугольные, прямоугольные, тупоугольные), если даны углы.
  
  

Краткое описание документа:

Презентация - это форма представления информации как с помощью разнообразных технических средств, так и без них. Задача презентации – сделать так, чтобы ее объект заинтересовал аудиторию. Для этого составляется сценарий презентации, в соответствии с которым подбираются: компьютерная графика, видеоряд, раздаточный материал, цветовое и звуковое оформление и другие средства. 

Данная презентация поможет в понятной форме объяснить тему по программированию "Оператор выбора Case. Решение задач". 

Данная презентация содержить определение, описание, структуру программы, пример решения задач. А также задача для самостоятельного выполнения, затем по презентации идет прверка данной задачи. и задачи , которы будут заданы на дом.