Студопедия

КАТЕГОРИИ:

АстрономияБиологияГеографияДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРиторикаСоциологияСпортСтроительствоТехнологияФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника


Исходные данные.




№ Варианта Процедура или функция
function Copy(S: String; Index, Count: Integer): String; Возвращает подстроку строки S, начинающуюся с позиции Index и содержащую до Count символов.
function Concat(Sl , S2: String): String; Возвращает строку, склеенную из строк S1 и S2.
procedure Delete(var S: String; Index, Count: Integer); Удаляет из S подстроку, начинающуюся с позиции Index и содержащую до Count символов.
procedure Insert(Source: String; var S: String; Index: Integer) ; Вставляет строку Source в строку S, начиная с позиции Index.
procedure Replace (Source: String; var S: String; Index: Integer); Заменяет символы строки S, начиная с позиции Index, на символы строки Source.
procedure Reverse (var S: String); Переставляет символы из конца строки S в её начало.
function PosFirst(Symbol: Char; S: String): Integer; Возвращает позицию первого вхождения символа Symbol в строку S. Если символа нет в строке S, то возвращается 0.
function PosLast(Symbol: Char; S: String): Integer; Возвращает позицию последнего вхождения символа Symbol в строку S. Если символа нет в строке S, то возвращается 0.
function Pos (Symbol: Char; S: String; Count: Integer): Integer; Возвращает позицию Count вхождения символа Symbol в строку S. Если символ входит в строку S меньше Count раз, то возвращается 0.
function Count (Symbol: Char; S: String): Integer; Возвращает число вхождений символа Symbol в строку S. Если символа нет в строке S, то возвращается 0.
function StrComp (Str1, Str2: String): Integer; Сравнивает две строки Str1 и Str2 c учетом регистра. Возвращает: -1, если Str1 < Str2; 0, если Str1 = Str2; и 1, если Str1 > Str2.
function StrEnd (S: String): Integer; Возвращает позицию символа конца строки S.

Контрольные вопросы

1. Каким образом представляется символьная информация в вычислительной технике, и какие типы данных для работы с ней предусмотрены в языке Object Pascal?

2. Что такое короткая строка и в чем её отличие от других видов строк?

(Ответ пояснить на примерах из лабораторной работы).

3. Что такое длинная строка и в чем её отличие от других видов строк?

(Ответ пояснить на примерах из лабораторной работы).

4. Что такое широкая строка и в чем её отличие от других видов строк?

(Ответ пояснить на примерах из лабораторной работы).

5. Что такое строки с типом PChar или PWideChar и в чем их отличие от других видов строк?

(Ответ пояснить на примерах из лабораторной работы).

6. Сколько байт памяти будет занято при выполнении следующей программы?

Var

S1, S2: String;

S3: String[6];

S4, S5: WideString;

S6: PChar;

Begin

S1 := 'String';

S2 := S1;

S3 := 'Pascal';

S4 := 'Delphi';

S5 := 'S4;

S6 := 'Pointer';

end;

7. Разработать функцию, которая возвращала бы значение арифметических операций сложения (+), вычитания (–), умножения (*) или деления (/) при условии, что исходная информация передается через строковую переменную в формате ‘Операнд1 операция Операнд2’

8. Разработать процедуру, которая изменяла бы порядок слов в строке, предаваемой в списке параметров.

9. Разработать процедуру, которая удаляла бы заданное слово из строки, предаваемой в списке параметров.

10. Разработать процедуру, которая заменяла бы заданное слово в строке, новой строкой, предаваемой в списке параметров.

11. Разработать функцию, которая находила бы, сколько раз в строке встречается заданное слово, которое предается в списке параметров.

12. Разработать функцию, которая находила бы, сколько различных символов входит в строку, указанную в списке параметров.



Поделиться:

Дата добавления: 2015-08-05; просмотров: 94; Мы поможем в написании вашей работы!; Нарушение авторских прав





lektsii.com - Лекции.Ком - 2014-2024 год. (0.007 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав
Главная страница Случайная страница Контакты