Программирование операций с символами и строками в средах Turbo Pascal и Delphi 6.0: Учебное пособие

МИНИСТЕРСТВО ОБРАЗОВАНИЯ  РОССИЙСКОЙ ФЕДЕРАЦИИ        

        Ульяновский государственный технический университет

              Институт авиационных технологий и управления

 

                       Ю. Н. Антонов

                                                                     УРОК 4                           

                     Программирование операций  с символами  и 

               строками  в средах Turbo Pascal и DELPHI 6.0.

                                      Учебное  пособие        

                                   Ульяновск  2002

УДК 681.3:519.68(076)

Программирование операций с символами и строками в средах

Pascal  и Delphi 6.0.Учебное пособие.  Ю.Н. Антонов. УлГТУ, 2002.

Пособие предназначено для  учащихся школ и   студентов ВУЗов   изучающих программирование.

Работа подготовлена на кафедре “Экономика, управление и

информатика”   института авиационных технологий и управления ИАТУ.

         Табл. 1. Библиогр.3 назв.

        Рецензент  - зав. кафедрой “Вычислительной техники”  УлГТУ

                              профессор, д.т.н. Соснин П.И.   

                                                              Одобрена  секцией

                                                              методических пособий 

                                                              Научно-методического совета  

                                                               университета

                                                 Ó   Ульяновский государственный

                                                               технический университет, 2002

                                          ОГЛАВЛЕНИЕ

     ПРЕДИСЛОВИЕ .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .    4  

  1. ИСПОЛЬЗУЕМЫЕ ПРОЦЕДУРЫ И КОМПОНЕНТЫ.    .   .   .   .    5 

  2. ЛИНЕЙНЫЕ  ПРОГРАММЫ .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   6

  3.  ВЕТВЛЕНИЯ.    .   .   .   .   .   .   .   .   .   .       .   .   .   .   .   .   .   .   .   .   .    5

  4.  ЗАДАНИЯ ДЛЯ САМОСТОЯТЕЛЬНОЙ РАБОТЫ.  .   .   .   .   .   6

  5.  КОНТРОЛЬНЫЕ  ВОПРОСЫ   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .  7

  6. СПРАВОЧНИК ПО ПРОЦЕДУРАМ И ФУНКЦИЯМ    .   .   .   .   .  7     

  7.  СООБЩЕНИЯ  .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .    9

        Литература   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .   .     9

   1.  ИСПОЛЬЗУЕМЫЕ КОМПОНЕНТЫ И ПРОЦЕДУРЫ

 Язык Pascal for Windows:

                Read – ввод данных

              Writе – вывод данных

                Sqrt – извлечение квадратного корня

Компоненты Delphi 6.0:

Edit - однострочный редактор для ввода и вывода строки текста

Memo -  многострочный редактор для ввода и вывода нескольких  

                               строк текста

Button - простая кнопка

Label-    метка  для вывода текста                              

             Lisbbox- список

 Процедуры Delphi 6.0:

StrToInt -  преобразование строки  в целое число

StrToFloat - преобразование строки в действительное число

FloatToStr  -  преобразование действительного числа в строку

IntToStr - преобразование целого числа в строку 

                              СИМВОЛЫ  И  СТРОКИ                               

Алфавитный порядок символов задается таблицей ASCII.

Предложение задается последовательностью слов в виде текстовой строки.

Слова в последовательности разделены одним или несколькими пробелами.

В состав каждого слова могут входить:

    q   английские буквы, как большие, так и малые.

    q   цифры от 0 до 9,

    q  символы знаков: <+> <-> <:> <*> <.> </> <=>.

Длина одного слова не превышает 20 символов.

Определения:

ЦЕПОЧКА - набор из последовательных символов слова.

КРАТНЫЕ символы - цепочка из одинаковых символов.

ДВОЙНЫЕ символы - два рядом стоящих в слове одинаковых символа.

ЧИСЛО - цепочка из цифр. 

СЛОГ – цепочка  из двух букв, согласной и гласной (A,E,I,O,U).

РЕГУЛЯРНАЯ цепочка состоит только из больших английских букв.

Задача 4.1.1.  Вывод  таблицы символов в среде Pascal.

Program prog4_11;

uses WinCrt;

var

       ch:char;     {символ }

       dec:integer; {десятичный код символа}

       i,j:integer;

       num:byte;

 begin

       Write ('Введите начальный код 0 или 128  ');

       readln(num);

       dec :=num ;

       for i:=0 to 15 do {шестнадцать строк }

              begin

                 dec:=i+num;   { чтобы получить таблицу 128-255}

                      for j:=1 to 8 do { восемь колонок }

                          begin

                                 if dec<33 then write(dec:5,'  '){символы c кодами 1-32                 

                                                                                   не     отображаются}

                                                  else write(dec:5, ' ' , chr(dec):1);

                                  dec:=dec+16;

                          end;

                  writeln; { 'переход к новой строке экрана ' };

               end;

end.

                  Результат решения задачи представлен на рис. 4.1а и 4.1б.

                                                   Рис.4.1а.