Основы языка Turbo Pascal

разработка: Крутченко Т. И.

 

Основы языка  
TURBO PASCAL

разработка: Крутченко Т. И.

 

Содержание:

 

Алгоритмы

Условие

Ветвления:  Инструкция IF

   Инструкция CASE

 Инструкция FOR

Циклы: 

 Инструкция WHILE

 Инструкция REPEAT

Массивы: Объявление массива

Сортировка  массива

- сортировка методом прямого выбора

- сортировка методом прямого обмена

Поиск в массиве

Многомерные массивы

Ошибки  при использовании массива

Выход

разработка: Крутченко Т. И.

 

Алгоритм

 

Алгоритмы решения большинства  задач не являются последовательными.действия (вычисления), которые необходимо выполнить, могут зависеть от определённого  условия, например входных данных, или  результатов, полученных во время выполнения программы. Например, в программе  проверки знаний оценка за выбранный  из нескольких вариантов ответ, добавляемая  к общей сумме баллов, зависит  от того, является ли ответ правильным. Фрагмент алгоритма решения этой задачи представлен на блок-схеме.

 

БЛОК-СХЕМА

 

Назад

 

Далее

разработка: Крутченко Т. И.

 

Пример фрагмента блок-схемы  ветвящегося алгоритма                                   
 

 

Получить

номер

ответа

 

Ответ

правильный?

 

Перейти к 

следующему

 заданию

 

Да

 

Нет

 

Назад

разработка: Крутченко Т. И.

 

Условие

 

В языке Pascal условие - это выражение  логического типа (BOOLEAN), которое  может принимать одно из двух значений: “истина” (TRUE) или ”ложь” (FALSE).

В Pascal имеется шесть операторов, позволяющих сравнивать между собой  значения числовых переменных, а также  значение переменной и константу (число).

Оператор   Описание    Значение выражения

       > Больше TRUE, если первый операнд больше второго, иначе    FALSE

       < Меньше TRUE, если первый операнд меньше второго, иначе    FALSE

       = Равно TRUE, если первый операнд равен второму, иначе    FALSE

      < > Не равно TRUE, если первый операнд не равен второму, иначе

                                          FALSE

      < = Больше или     TRUE, если первый операнд больше или равен                        равно второму, иначе FALSE

      < = Меньше или TRUE, если первый операнд меньше или равен   равно второму, иначе FALSE

 

Далее

 

Меню

 

Назад

разработка: Крутченко Т. И.

 

Использование операторов сравнения  позволяет записывать простые условия. Из простых условий, которые являются выражениями логического типа, можно  строить сложные условия с  применением к ним, как к операндам, логических операторов: NOT - отрицание, AND - “логическое И”, OR - “логическое ИЛИ”.

При записи сложных условий важно  учитывать то, что логические операторы  имеют более высокий приоритет, чем операторы сравнения, поэтому  простые условия следует брать  в скобки.

 

Например:

((a = b) AND (c = d))  OR (a > d)

 

 

 

Далее

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Выбор действия в зависимости от выполнения условия может быть реализован при помощи инструкций IF и CASE.

 

 

Синтаксис инструкции IF:

    if условие

               then

                     begin

            {инструкции, выполняемые, если условие истинно}

                     end

            else

                     begin

                        {инструкции, выполняемые, если условие ложно}

                     end;

 

ВЕТВЛЕНИЯ

 

Инструкция IF

 

Далее

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Инструкция IF выполняется  следующим образом: 
1. Вычисляется значение условия (выражения логического типа). 
2. Если значение выражения условия равно TRUE, то выполняются инструкции следующие за словом THEN. Если значение выражения условия равно FALSE, то выполняются инструкции, следующие за словом ELSE.

 

Примечание:

Если при выполнении (невыполнении) условия надо выполнить только одну инструкцию, то слова BEGIN и END (ELSE) могут  быть опущены.

 

Назад

 

Далее

 

Меню

 

Блок-схема

 

Пример

разработка: Крутченко Т. И.

 

Блок-схема составного оператора  
  IF - THEN - ELSE

 

Условие

 

 

Команды №1

 

 

Команды №2

 

TRUE

 

FALSE

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Пример:

 

Если переменная t содержит обозначение типа соединения сопротивлений электрической цепи (t = 1 соответствует последовательному соединению, t = 2 - параллельному), а переменные r1 и r2 содержат величины сопротивлений, то инструкция

                   if t = 1

             then

                     z:=r1 + r2

           else

                   z:=(r1 + r2)/(r1*r2);

вычисляет сопротивление цепи в  зависимости от типа соединения сопротивлений.

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Если какое-либо действие нужно  выполнить только при выполнении условия, инструкция IF может быть записана так:

if  {условие}

        then

                         begin

                {инструкции, выполняемые, если условие}                       {истинно}

                          end

Например, инструкция

if  n = m

           then c:= c+ 1;

увеличивает значение переменной с только в том случае, если значения переменных n и m равны.

 

Далее

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Часто в программе необходимо реализовать выбор более чем  из двух вариантов. Множественный выбор  можно реализовать при помощи двух инструкций IF, одна из которых «вложена» в другую.

 

if   {условие}

       then

           begin

               {инструкции, выполняемые, если условие истинно}

           end

      else

            if {условие}

                then begin

             {инструкции, выполняемые, если условие истинно}

                         end

                   else begin

                            {инструкции, выполняемые, если условие ложно}

                            end;

               end.

   Обратите внимание, что после инструкций, расположенных перед else, символ «точка с запятой» не поставлен.

 

 

Далее

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Инструкция CASE позволяет реализовать множественный выбор и в общем виде записывается так:

case выражение of

список  констант 1: begin

                                     {последовательность инструкций 1}

                                   end;

список констант 2: begin

                                     {последовательность инструкций 2}

                                   end;

список констант N: begin

                                      {последовательность инструкций N}

                                    end;

                                    else begin

                                                последовательность инструкций, выполняемая в}     {случае, если выражение не попало ни в один из}   {списков констант}

                                             end;

end; 

 

 

Инструкция CASE

 

Далее

 

Назад

 

Меню

 

Пример

 

Блок-схема

разработка: Крутченко Т. И.

 

 
 
Выражение - выражение, от значения которого зависит дальнейший ход программы (одна из последовательностей инструкций, которая должна быть выполнена). 
 
 
 
Список констант - константы, разделенные запятыми. Если константы представляют диапазон чисел, то вместо списка можно указать первую и последнюю константу диапазона, разделив их двумя точками. Например, список 1, 2, 3, 4, 5, 6 может быть заменен диапазоном 1..6.

 

Назад

разработка: Крутченко Т. И.

 

Выражение

 

Команды 1..

 

Команды 2..

 

 

Команды 3..

 

.

.

.

 

Блок-схема алгоритма, соответствующего инструкции  
   CASE

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Пример:

 

1. case day of

       1, 2, 3, 4, 5: write (‘Рабочий день.’);

       6: write (‘Суббота!’);

       7: write (‘Воскресенье!’);

    end;

              2. case day of

                      1..5: write (‘Рабочий день.’);

                      6: write (‘Суббота!’);

                      7: write (‘Воскресенье!’);

                   end;

3. case day of

       6: write (‘Суббота!’);

       7: write (‘Воскресенье!’);

       else write (‘Рабочий день.’);

    end;

 

 

Назад

разработка: Крутченко Т. И.

 

При выполнении инструкции CASE происходит следующее: вычисляется выражение  оператора CASE, затем полученное значение последовательно сравнивается с  константами из списков констант. Если значение выражения совпадает  с константой из списка, то выполняется  соответствующая этому списку последовательность инструкций, и на этом выполнение инструкции CASE завершается. Если значение выражения  не совпадает ни с одной константой из всех списков, то выполняется последовательность инструкций идущих после ELSE. Синтаксис  инструкции CASE позволяет использовать ELSE и соответствующую последовательность инструкций. В этом случае, если значение выражения не совпадает ни с одной  из всех списков, то выполняется следующая  за CASE инструкция.

 

Пример

 

Далее

 

Назад

 

Меню

разработка: Крутченко Т. И.

 

Пример:

 

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

                 var

                            vybor: integer;

                  begin

                      writeln (‘1 - Максимальное число’);

                      writeln (‘2 - Минимальное число’);

                      writeln;

                      writeln (‘Введите номер задачи и нажмите <Enter>’);

                      readln (vybor);

                      case vybor of

                           1: begin

                                    {вычисление максимального числа}

                               end;

                           2: begin

                                   {вычисление минимального числа}

                                end;

                          end;