34655

Условный оператор. Оператор выбора

Реферат

Информатика, кибернетика и программирование

Например вычисление квадратного корня из числа проводится при условии =0 операторами: IF =0 Then b := Sqrt Else begin WriteLn' 0'; Redln; Hlt end; Оператор Hlt прекращает выполнение программы. PROGRM VES; { определение весовой категории спортсмена } Условная схема программы CONST 1='легкая категория'; 2='средняя категория'; 3='тяжелая категория';...

Русский

2013-09-08

50.5 KB

0 чел.

исциплина «Основы алгоритмизации и программирование»  Условный оператор. Оператор выбора

Условный оператор. Оператор выбора

Условный оператор IF

Условный оператор включает в себя операторы, которые выполняются или не выполняются в зависимости от записанного в операторе условия. Оператор имеет вид:

  IF  "условие"  Then  "оператор1"  Else  "оператор2";

где "условие" - выражение логического типа;

"оператор1" выполняется, если условие верно ( True ),

"оператор2" выполняется, если условие не верно ( False ).

Например, вычисление квадратного корня из числа "a" проводится при условии a>=0, операторами:

 IF a>=0 Then b := Sqrt(a)

 Else

   begin

     WriteLn('a<0');

     Readln;

     Halt

   end;

Оператор Halt прекращает выполнение программы.

Схема выполнения условного оператора имеет вид:


В условном операторе может отсутствовать блок
Else оператор2; т. е. условный оператор может иметь вид:

IF "условие" Then "опертор1";

например:
IFa<0 Then a:= abs(a); 

Приведем пример программы определения весовой категории в зависимости от веса спортсмена.

PROGRAM VES;                        { определение весовой категории спортсмена }

                                    Условная схема программы

CONST A1='легкая категория';

     A2='средняя категория';

     A3='тяжелая категория';

     A4='сверхтяжелая категория';

var

 V : integer;

BEGIN

 Write('введите вес спортсмена V = '); ReadLn(v);

 if V<62 then WriteLn(A1)           {вложенный условный оператор }

 else if V<75 then WriteLn(A2)

      else if V<88 then WriteLn(A3)

           else WriteLn(A4)

 writeln('Нажмите Enter');

 readln;

END.

Для разложения целого числа на цифры удобно применять операции: MOD и DIV. Например, если дано трехзначное число "N" ( "N" соответствует "X1X2X3" ), то цифры: X1X2X3, составляющие это число определяются блоком операторов:

 X3:= N mod 10;

 N:= N div 10;

 X2:= N mod 10;

 N:= N div 10;

 X1:= N;

Если требуется определить, делится ли вещественное число "A" нацело на число "B", то можно применять функции Frac(x); и Int(x); например:

 x := A/B;    

 if Frac(x) = 0  then writeln('Число "A" делится нацело на число "B"');

 if Int(x) = x   then writeln('Число "A" делится нацело на число "B"');

Условный оператор может применяться для идентификации (распознавания) объекта по определенным признакам составляющих его элементов. Например, если объектом является треугольник, то элементами объекта могут быть: 1) три его угла (a, b, c); 2) три его стороны (a1, b1, c1); и т. д.

Признаками являются значения элементов по которым производится идентификация, например, для углов: 1) один угол > 90 - (один признак); 2) три угла < 90 - (три признака); и т. д.

В результате идентификации объект получает имя. Например, треугольник - остроугольный, либо тупоугольный и т. д.

Если идентификация проводится по одному признаку для нескольких элементов, то несколько условий связываются служебным словом "or", например:

 If (a > 90) or (b > 90) or (c > 90) then writeln ( 'Треугольник - тупоугольный' );

Если идентификация проводится по нескольким признакам, число которых равно числу элементов, то несколько условий связываются служебным словом "and", например:

 If (a < 90) and (b < 90) and (c < 90) then

   writeln('Треугольник - остроугольный');

Если имя объекта составное, то добавляются признаки для идентификации второй части имени и применяются вложенные условные операторы, например, для равнобедренного треугольника:

 If (a < 90)and (b < 90) and(c < 90) then

   If (a=b) or (b=c) or (a=c) then

     writeln('Треугольник - остроугольный и равнобедренный')  

   else writeln('Треугольник - остроугольный');

Напомним, что условный оператор можно применять для контроля правильности вводимых данных, например:

 If (a+b+c)<>180 then

   begin

     writeln('Суммауглов <> 180');

     Halt  

   end;

Если для идентификации объекта достаточно меньшего числа признаков, чем число элементов, то условия, связанные "and" группируются, а группы соединяются служебным словом "or". Например, четырехугольник имеет элементами четыре стороны ( a, b, c, d ), а его имя устанавливается по двум признакам (равенство двух пар сторон), тогда можно использовать операторы:

 If ((a=b) and (c=d)) or ((a=c) and (b=d)) or ((a=d) and (b=c)) then

   writeln('Параллелограмм');

Оператор выбора CASE

Оператор служит для выбора одного из помеченных вариантов действия (операторов), в зависимости от значения "параметра". Оператор имеет вид:

  Case "параметр" Of

    "список помеченных операторов"    

    Else "оператор"

  End;

Здесь "параметр" - выражение или переменная порядкового типа.

Из "списка помеченных операторов" выполняется оператор с меткой, включающей значение "параметра", иначе оператор после слова Else.

Конструкция Else "оператор" может отсутствовать. Напомним, что "оператор" может иметь вид: Begin "операторы" end;

Пример операторов для определения порядка целого числа N от 0 до 999:

 case N of

   0..9     : writeln('однозначное');

   10..99   : writeln('двузначное');

   100..999 : writeln('трехзначное')

   else writeln('Число "N" не входит в указанный диапазон')  

 end;

Приведем пример программы случайного предсказания одного из десяти вариантов ближайшего будущего с вероятностью 1/20, в остальных случаях - вы "неудачник".

PROGRAM FUTURE;

var N : word;

BEGIN

 writeln('ПРЕДСКАЗАНИЕ БУДУЩЕГО');

 Randomize;

 N:=Random(20)+1;      { N - случайное число от 1 до 20 }

 writeln;   write('Вас ожидает ');

 case N of

    1 : writeln('счастье');

    2 : writeln('пятерка');

    3 : writeln('дорога');

    4 : writeln('двойка');

    5 : writeln('болезнь');

    6 : writeln('здоровье');

    7 : writeln('деньги');

    8 : writeln('любовь');

    9 : writeln('встреча');

    10 : writeln('дети')

     else writeln('неудача')

 end;

 writeln('Нажми Enter');

 readln;  

END.

Здесь функция Random(x) генерирует случайное число, с равномерной плотностью распределения на заданном интервале. Для инициализации распределения в начале программы необходимо вызвать процедуру Randomize.


 

А также другие работы, которые могут Вас заинтересовать

28194. Вклад У. Джеймса в развитие психологической науки 34.5 KB
  Функционализм психологическое направление появившееся в США в конце ХIХ в исследующее процессы сознания с точки зрения их функции в приспособлении организма к среде. С позиций функционализма психология понималась как наука о функциях или €œдеятельностях€ сознания в их отношениях к нуждам организма и в связи с задачей его эффективной адаптации к изменяющемуся природному и социальному окружению. Задача функционализма изучить каким образом индивид посредством психических функций приспосабливается к изменчивой среде исследование...
28195. Бихевиоризм и необихевиоризм (Дж.Уотсон, Э.Толмен, Б.Скиннер и др.) 38.5 KB
  Бихевиоризм и необихевиоризм Дж. Предметом психологии бихевиоризм считает не сознание а поведение. Бихевиоризм от англ. Манифестом бихевиоризма считается статья его основателя американского психолога Дж.
28196. Психоанализ (З.Фрейд, К.Юнг, А.Адлер, К.Хорни и др.) 49.5 KB
  Наиболее существенными для развития личности Фрейд считал сексуальные инстинкты. Вместо того чтобы изучать сны Адлер обратился к исследованию ранних воспоминаний которые считал ключом к пониманию поведения мотивации и личности. Стиль жизни формируется к 5ти годам под влиянием творческой силы личности и в связи с ним формируется тип личности: Управляющий – активный антисоциальный; Берущий – низко активный паразитирующий; Избегающий – не активный нет социального интереса; Социальнополезный – высокий соц. В качестве механизмов...
28197. Гештальтпсихология (М.Вертгеймер, В.Келер, К.Коффка, К.Левин и др.) 41 KB
  История гештальтпсихологии берет начало в Германии в 1912 когда М. В противовес представлениям ассоцианистов о том что образ создается через синтез отдельных элементов и свойства целого определяются свойствами частей гештальтпсихологи выдвинули идею целостности образа свойства которого не сводимы к сумме свойств элементов в связи с этим часто подчеркивается роль гештальтпсихологии в становлении системного подхода в науке. Согласно гештальтпсихологии для человека существуют два отличных друг от друга мира: мир физический лежащий за...
28198. Предмет психологии. Специфические особенности и классификация психических явлений 68.5 KB
  Психология наука о закономерностях развития и функционирования психики как особой формы жизнедеятельности. Практическая психология ее задачи и роль в общественной практике. Психология изучает психику в закономерностях ее развития. Современная психология представляет собой широко развернутую область знаний включающую ряд научных дисциплин и направлений.
28199. Классификация методов современной психологии 37.5 KB
  Ананьева методы психологического исследования являются системами операций с психологическими объектами и вместе с тем являются гносеологическими объектами самой психологической науки.Пирогова: Собственно методы. Вспомогательные методы А Математические статистические Б Графические В Биохимические физиологические и др. Методические методы А Генетические Б Психофизиологические.
28200. Возникновение и развитие психики в процессе эволюции. Стадии развития психики 61 KB
  Под инстинктами понимаются действия или более менее сложные акты поведения которые появляются сразу как бы готовыми не зависят от выучки и индивидуального опыта будучи наследственно закрепленным продуктом филогенетического развития. Индивидуальноизменчивые формы поведения. Уже на ранних ступенях развития наблюдая поведение животных мы встречаем индивидуальноизменчивые формы поведения которые могут быть охарактеризованы как навыки новые реакции или действия которые возникают на основе выучки или индивидуального опыта и функционируют...
28201. Вклад В.Вундта в оформление психологии как самостоятельной науки. Создание психофизики (Г.Фехнер) 33 KB
  Кризис психологии выявился в наибольшей своей остроте когда сформировалась поведенческая психология рефлексология в России и бихевиоризм в Америке потому что поведенческая психология выдвинув поведение как предмет психологии с особенной остротой выявила кризис центрального понятия всей современной психологии понятия сознания. Согласно Вундту предметом изучения психологии является сознание а именно состояния сознания связи и отношения между ними законы которым они подчиняются. Используя метроном Вундт выделил ряд основных...
28202. Влияние идей И.М.Сеченова и И.П.Павлова на становление отечественной психологии 40.5 KB
  Иван Петрович Павлов 18491936 создатель материалистического учения о высшей нервной деятельности животных и человека. Учение Павлова о высшей нервной деятельности сложилось под влиянием материалистических традиций русской философии и развивало идеи И. В начале своей научной деятельности Павлов занимался преимущественно изучением сердца и кровеносных сосудов. Так было заложено начало павловского учения о трофической нервной системе особых нервных волокнах регулирующих процессы питания в тканях обмен веществ в них и тем самым...