Pascal. Оператор выбора.

Оператор выбора. Общие сведения.

   Здравствуйте. В этой статье мы поговорим об операторе выбора в Pascal. Оператор выбора это как многовариантный условный оператор. То есть он дает нам несколько вариантов. Объясню на примере.
   К примеру вы идете по улице и видите развилку: можно повернуть направо и налево. Вот такая развилка - это условный оператор. А оператор выбора - это целый перекресток. То есть, вы можете по 3, 4, 5 разным дорогам пойти. Он удобен для тех случаев, когда есть не 2 варианта, а больше (как у нас в калькуляторе - 4 действия). Использование его в таких ситуациях уменьшает количество кода и повышает читабельность.
   Выглядит использование этого оператора вот так: 

   case ch of
     '+' : c:=a+b;
     '-' : c:=a-b;
     '*' : c:=a*b;
   else writeln('Ашипка!');
  end;

   Cначала пишем зарезервированное слово case. С него начинается оператор. Затем пишем переменную, значения которой мы должны проверить. Кстати, сразу отмечу, что проверять УСЛОВИЯ с помощью этого оператора НЕ получиться. С помощью оператора выбора можно лишь проверять значение переменной, и в связи с этими значениями что-то делать.
   Итак, продолжим. После переменной пишем of. Это второе ключевое слово. Далее последовательно перечисляем возможные значения переменной. Значение переменной типа char указывается в кавычках, типа word (маленький целочисленный тип, значения от 0 до 255) указываются без кавычек. Затем ставится двоеточие, а после него действие. У нас это c:=a+b; И так с каждым значением.
   Есть необязательная ветка else. Если ни один из перечисленных вариантов не подходит, выполняется ветка else. 
   После всего ставится слово end; оно означает окончание оператора выбора. Не забывайте его ставить, причем лучше сразу как написали слово case.
   Итак, вот собственно и все, про оператор выбора. Теперь давайте я покажу код целиком:

uses crt;
var a, b, c : integer;
    ch : char;
begin
  clrscr;
  writeln('Введите 1 число');
  readln(a);
  writeln('Введите арифметическое дейстие');
  readln(ch);
  writeln('Введите 2 число');
  readln(b);
  case ch of
     '+' : c:=a+b;
     '-' : c:=a-b;
     '*' : c:=a*b;
   else writeln('Ашипка! :)');
  end;
  writeln(a,ch,b,'=',c);
  readln;
end.



   В этот раз можете просто его скопировать. Но лучше как всегда, перепишите. Самые внимательные заметили, что кроме оператора выбора добавилась еще одна строчка - clrscr;
   Это функция очистки экрана.

Деление целых чисел

   Итак, в прошлой статье я обещал, что расскажу, как делить целочисленные переменные. Для этого есть всего 2 функции.
  1. div - функция целочисленного деления, которая возвращает целую часть от частного. К примеру, мы делим 10 на 4. у нас получается 2,5. В ответ запишется 2. Если мы делим 34 на 8 у нас получится 4. Я думаю, понятно.
  2. mod - функция целочисленного деления, которая возвращает остаток от целочисленного деления. Например, мы делим 41 на 5. В остатке получим 1. Или делим 50 на 10. В остатке получим 0.
   Используют их так:

   c:=a div b;
   c:=a mod b;

   Думаю, что все ясно.
   
   А вот вам и задание. Добавьте в программу функцию деления. Чтоб она выводила целую часть от деления. Это конечно не очень точно, но для тренировки сойдет. Можете даже отдельно сделать так, чтоб программа отдельно выводила целую часть и остаток. Если у вас получится это сделать, то будет круто :)
   Ну а в следующей статье я расскажу вам про циклы в Pascal. Спасибо за прочтение, если что-то непонятно, пишите в комментариях, всем удачи и всем пока! :)

Комментариев нет:

Отправить комментарий