Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Работа со строковым типом данных




Лабораторная работа №9

Цель: научиться составлять программы решения задач с использованием символьных и строковых типов данных.

Теоретические сведения:

Строка – последовательность символов. В языке Pascal для строк отведен свой тип данных: string. String – строка размером 255 символов. String[n] – строка размером n символов, где n должно быть больше нуля и меньше или равно 255.

Так же мы можем и вручную присваивать переменной строкового типа значения через оператор присваивания: Stroka:=’строка’;

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

Для переменных строкового типа предусмотрены некоторые функции и процедуры:
Функция Действие Пример


Length(s) Длина строки s Len:=Length(stroka);


Copy(s, start, finish) Копирует часть строки s S2:=Copy(s1, 3, 5);

с позиции start до

позиции finish


Delete(s, start, finish) Удаляет из строки символы Delete(s1, 4, 6);

с позиции start до позиции

Finish


Insert(s, s1, posit) Вставляет в строку s Insert(s1,s2, 2);

строку s1 в позицию posit

 

Pos(sub, s) Позиция подстроки sub в N:=Pos(‘asd’, s1);

строке s. В случае, если

строка не содержит данной

подстроки, то функция

возвращает значение 0.

 

Str(x, s) Преобразует числовое значение Str(124, s1);

х в строковое s

 

Val(s, x, error) Преобразует строку s в Val(s1,123.22,error_code);

числовое значение x.

 

Порядок выполнения работы:

1) Запустите программу Turbo Pascal.

2) Составьте программу решения задачи: Ввести строку символов, заменить все буквы «а» на буквы «о». Откомпилируйте программу. Проверьте правильность решения задачи на примере.

 

3) Составьте программу решения задачи: Даны две фамилии определить, какая из них длиннее. Откомпилируйте программу. Проверьте правильность решения задачи на примере.

 

4) Составьте программу решения задачи: Определить и вывести на экран количество слов во введенной строке. Откомпилируйте программу. Проверьте правильность решения задачи на примере.

 

5) Составьте программу решения задачи: Заданы фамилия, имя и отчество учащегося, разделенные пробелами. Напишите программу, печатающую фамилию ученика и его инициалы.

Откомпилируйте программу. Проверьте правильность решения на конкретном примере.

6) Составьте программу решения задачи: Введённую с клавиатуры строку А записать в обратном порядке в строку В. Строку В вывести на экран. Откомпилируйте программу. Проверьте правильность решения задачи на конкретном примере.

 

7) Составьте программу решения задачи: Составить программу, определяющую, является ли введенное слово перевертышем. Откомпилируйте программу. Проверьте правильность решения задачи на конкретном примере.

8) Запишите полученные результаты в тетрадь. Оформите отчет о проделанной работе, который должен содержать тему, цель работы, формулировки задач с решениями.

 

9) Выйдите из программы Turbo Pascal.





Поделиться с друзьями:


Дата добавления: 2015-06-26; Просмотров: 613; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.009 сек.