Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя.

1-ый Столичный Образовательный Комплекс

Базы алгоритмизации и программирования

Язык программирования Турбо Паскаль

Практическая работа №6

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

Методические указания

Разработала педагог Ивлиева А.Л.

Москва, 2015


Практическая работа №6.

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

Цель работы: Научиться объявлять строковые переменные и использовать процедуры и функции для строк.

Теоретическая справка

Наибольшая длина строчки в Паскаль 255 знаков. Строчки именуются динамическими, так Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. как могут иметь наименьшую длину в границах объявленных границ. Строчка объявляется в разделе VAR:

var имя: STRING[длина];

Длину строчки указывать необязательно, тогда будет объявлена строчка длиной 255 знаков.

При попытке записать в переменную строчку длиннее, чем объявлена, лишняя часть будет отсечена.

Значением строчки может быть неважно какая последовательность Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. знаков, заключенная в апострофы.

Строчки можно сливать, присваивать и ассоциировать.

Строчки соединяются при помощи знака «+».

К примеру:

S1:=’город’;

S2:=’Москва’;

S:=S1+’ ‘+S2; {S=’город Москва’}

Строчки равны, если имеют схожую длину и посимвольно эквивалентны.

Процедуры и функции Предназначение
Редактирование строк
LENGTH(S) Выдает текущую длину строчки К Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. примеру: S:=’магазин’; n:=LENGTH(S); {n=7}
COPY(S,N,L) Возвращает подстроку длиной L, начинающуюся с позиции N строчки S К примеру: S:=’автоматизация’; S1:=COPY(S,3,5); {S1=’томат’}
DELETE(S,N,L) Удаляет подстроку длиной L, начинающуюся с позиции N строчки S К примеру: S:=’автоматизация’; DELETE Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя.(S,8,6); {S=’автомат’}
INSERT(SUB,S,N) Вставляет подстроку SUB, начиная с позиции N строчки S К примеру: S1:=’пока’; S2:=’лом’; INSERT(S2,S1,3); {S1=’поломка’}
POS(SUB,S) Отыскивает 1-ое вхождение подстроки SUB в строчку S и возвращает номер первого знака SUB в S либо 0 , если S не содержит SUB Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. К примеру: S:=’магазин’; n:=POS(‘а’,S); {n=2} m:=POS(‘газ’,S); {m=3} p:=POS(‘о’,S); {p=0}

Процедуры преобразования
STR(X,S) Конвертирует числовое значение Х в строковое S. Может быть задание формата для Х
VAL(S,X,Y) Конвертирует строковое значение S (строчка цифр) в значение Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. числовой переменной Х. Если преобразование не может быть выполнено, то в переменную Y записывается номер знака строчки, который явился предпосылкой беды преобразования. Если преобразование выполнено удачно, то значение Y равно нулю.

Пример:

Написать программку, которая делает из слова «строитель» слова «тир» и «тело».

program strings1;

uses Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. crt;

var str,str1,str2:string[20];

n:integer;

begin

clrscr;

write('Введите слово:');

readln(str);

n:=length(str);

writeln('Длина введенного слова:',n);

str1:=copy(str,2,1)+copy(str,5,1)+copy(str,3,1);

str2:=copy(str,6,3)+copy(str,4,1);

writeln('1-ое слово:',str1);

writeln('2-ое слово:',str2);

readln

end.

Пример:

Написать программку, которая подменяет в Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. слове "сверток" "ток" на "ло"

program string2;

uses crt;

var s:string;

n:integer;

begin

CLRSCR;

s:='сверток';

n:=pos('ток',s);

delete(s,n,3);

insert('ло',s,n);

writeln('Вышло слово ',s);

readln;

end.

Задание (на 3)

1. Найти сколько букв в слове автоматизация. Из слова автоматизация составить слова зима и заяц.

Program Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. str_1;

Введите строчку

автоматизация

n= 13 зима заяц

2. Найти сколько букв в слове технолог. Из слова технолог составить слова холл и лоно.

program str_2;

Введите строчку

технолог

длина слова технолог = 8 холл лоно

3. Найти сколько букв в слове таблица. Из слова составить слова бита и бал.

Program str_3;

таблица

бита бал

4. Выведите строчку погода отменная

Program str_4;

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

Program str_5;

Составьте программку, которая позволяет поменять местами данные, размещенные на 2-ух различных строчках и поместить их на одной строке. Строчки, состоящие из 2-ух слов, разделённых пробелом, вводятся с клавиатуры.

programstr_6;

Введите в строчку фамилию и имя

Сергей Шишков

Введите в строчку фамилию и имя

Вячеслав Иванов

Поменяли местами, вышло Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. = Вячеслав Иванов, Сергей Шишков

Введите предложение

арбитр свистит в свисток

Количество слов в предложении начинающихся буковкой «с» = 3

7. Поменять в слове монах подстроку нах на ряки.

programstr_7;

Введите строчку

монах

Введите строчку

ряки

мореплаватели длина приобретенного слова= 6

8. Поменять в слове ведро подстроку др на сл.

programstr_8;

Введите строчку

ведро

Введите строчку

сл

весло

9. Поменять в слове воск подстроку ск на да.

Program str_9;

воск

да

вода

10. Найти положение Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. буковкы р в слове информатика.

Program str_10;

11. Написать программку, которая по введенному символу выводит его код, соответственный таблице Asci

Program str_11;

C

67

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

Program str12;

65

A

Задания на 4

13. Из слова кипарис составить слово рапира.

Program str_13;

Введите строчку: кипарис

рапира

14. Написать Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. программку, которая выводит строчку в оборотном порядке.

Program str_14;

Введите строчку: кипарис

сирапик

15. Используя функцию VAL написать программку для преобразования строковой переменной в числовую, беря во внимание, что CODE - целая величина. Code=0 ,если нет ошибки).

7908 0

16. Составьте программку, которая предлагает ввести с клавиатуры две строчки s и t и выводит на экран более Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. длинноватую строчку.

program str_16;

Введите строчку s

институт

Введите строчку t

группа

Более длинноватая строчка =институт

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

Programstr_17;

Введите строчку

Студент 1 курса

Длина введенной строчки 18

Студент 1 курса

Длина перевоплощенной строчки = 15

18. Написать программку, которая по введенному символу выведет его код, соответственный таблице Asci, и, напротив, по введенному коду выведет Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. соответственный кодовой таблице Asci знак.

program str_18;

Ответ: L 76 L

19. Подсчитайте, сколько слов во введенном предложении начинается с буковкы «c».

Program str_19;

Составьте программку, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя.

Введите в строчку два слова разделяя их пробелом

Медведев Владислав

Пробел находится на Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. позиции 9

Поменяли слова местами, вышло: Владислав Медведев

21. Введите в 2 строчки свою фамилию и имя и обусловьте, какая из их длиннее.

program str_21;

Введите фамилию: Медведев

Введите имя: Владислав

имя Владислав длиннее фамилии Медведев

22. Используя функцию преобразования числовой переменной в строковую (STR), написать программку, которая выведет на экран Стоимость 100 рублей. Вначале переменная С:=100 целочисленная Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя..

ОТВЕТ: Стоимость 100 руб

На 5

23. Написать программку, которая определяет длину введенной строчки и количество пробелов в ней.

Programstr_23;

Введите строчку

Весна - это наилучшее время года.

Количество знаков = 30

Количество пробелов = 5

24. Написать программку, которая выводит на экран введенную строчку в «телеграфном» стиле (буковкы сообщения должны выдаваться по одной с некой задержкой). ( Используйте функцию sleep(500).

program str_24;

Рейс Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя. №56 задерживается!

25. Написать программку в какой следует найти количество знаков и точек в введенной строке, состоящей из нескольких предложений.

program str_25;

Сейчас пн. До праздничка осталось некоторое количество дней.

длина строчки 58. Количество точек 2.

26. Напишите программку, которая выводит код введенного юзером знака. Программка должна завершать работу в итоге введения точки Составьте программу, которая позволяет переставить местами, введенные с клавиатуры через пробел, Вашу фамилию и имя..

Program str_26;

Ответ: Введите знак и нажмите .

Для окончания работы программки введите точку.

->5

Знак: *5 Код: 53

->.

Знак: *. Код: 46

Пока.....

27. Написать программку, которая инспектирует, есть ли в введенной строке числа и определяет их количество.

Programstr_27;

Введите строчку

15 января 2017 года мне исполнится 18 лет.

В строке есть числа. Их 8.

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

Programstr_28;

Введите строчку

76.,8

Это строчка


sostavnie-chasti-shemi-zemleustrojstva-rajona.html
sostavnie-dokumenti-v-word.html
sostavnie-naimenovaniya-v-sovremennom-russkom-yazike-diplomnaya-rabota.html