7_Практическая работа "Символьные строки"-2 урок_учеб. К.Ю. Полякова 11 класс

Практическая работа «Строки 2»__________________вариант 1

1. Ввести с клавиатуры символьную строку и подсчитать количество цифр в ней.

Пример: Введите строку: Авпрсфд1лр3лр5

Результат: 3

1. Ввести с клавиатуры символьную строку и определить слово, начинающихся на букву «д». Словом считается последовательности непробельных символов, отделенная с двух сторон пробелами (или стоящая с краю строки). Слова могут быть разделены несколькими пробелами, в начале и в конце строки тоже могут быть пробелы. Если слов несколько, вывести на экран только первое.

Пример: Введите строку: Вася давно ушел гулять с друзьями.

Найдено слов: давно

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

Пример: Введите фамилию и имя: Семёнов Андрей Владимирович

Результат: А.В. Семёнов

Справочная информация:

ФУНКЦИИ:

Функция copy(S,Pos,N) – выделяет из строки S подстроку длиной в N символов, начиная с позиции Pos , где Pos – цифра;

Пример: s1:=‘пРОГресс’ ; s2:=copy(s1,2,3) ; Результат s2=’рог’

Функция concat(S1,S2,..,SN) – выполняет сцепление строк S1,S2,..,SN в одну строку

Пример: k:=Concat(‘До-’,’Ре-’,’Ми’); Результат k=‘До-Ре-Ми’

Функция Length(S) – определяет текущую длину строки S.

Пример: S:=’День космонавтики’; k:=Length(S); Результат k=17

Функция Pos(S1,S2) – обнаруживает ПЕРВОЕ появление в строке S2 подстроки S1.

Результат – целое число. Пример: S2:=’комната’; k:= Pos(‘а’, S2); Результат k=5

Функция Ord(s1) - возвращает номер символьной переменой S1

Пример: S1:=’Д’; k:=Ord(S1); Результат k=196

Функция Chr(n)- возвращает номер символьной переменой S1

Пример: n:=196; S1:=Chr(n); Результат S1=’Д’

ПРОЦЕДУРЫ:

Процедура Delete(S,S2,N) –выполняет удаление N символов из строки S, начиная с позиции S2.

Пример: S:=’Победа’ ; Delete(S,1,2); Результат S=’беда’

Процедура Insert(S1,S2,n) –выполняет вставку строки S1 в строку S2, начиная с позиции n.

Пример: S2:=’Учиться интересно’; Insert(‘-очень-‘,S2,8);

Результат S2=’Учиться-очень- интересно’

Процедура Str(x:2, s) преобразовывает число в строку. Пример: x:=2.73284 s='2.73'

Процедура Val(s, x, Osh) преобразовывает строку в число. Параметр Osh должен иметь тип Integer. Пример: s='2.73' x:=2.73

Практическая работа «Строки 2»__________________вариант 2

Уровень А. Ввести с клавиатуры символьную строку и выписать все цифры, содержащиеся в ней в строку через запятую и пробел.

Пример: Введите строку: Авпрсфд1лр3лр5

Результат: 1, 3, 5

Уровень В. Ввести с клавиатуры символьную строку и определить слово, начинающихся на одну и ту же букву. Словом считается последовательности непробельных символов, отделенная с двух сторон пробелами (или стоящая с краю строки). Слова могут быть разделены несколькими пробелами, в начале и в конце строки тоже могут быть пробелы. Если слов несколько, вывести на экран только первое.

Пример: Введите строку: Анна учит уроки обязательно.

Найдено слов: Анна

Уровень С. Напишите программу, которая вводит адрес файла и «разбирает» его на части, разделенные знаком '/'. Каждую часть нужно вывести в отдельной строке.

Пример: Введите адрес файла: C:/Фото/2015/Байкал/shaman.jpg

Результат: C:

Фото

2015

Байкал

shaman.jpg

Справочная информация:

ФУНКЦИИ:

Функция copy(S,Pos,N) – выделяет из строки S подстроку длиной в N символов, начиная с позиции Pos , где Pos – цифра;

Пример: s1:=‘пРОГресс’ ; s2:=copy(s1,2,3) ; Результат s2=’рог’

Функция concat(S1,S2,..,SN) – выполняет сцепление строк S1,S2,..,SN в одну строку

Пример: k:=Concat(‘До-’,’Ре-’,’Ми’); Результат k=‘До-Ре-Ми’

Функция Length(S) – определяет текущую длину строки S.

Пример: S:=’День космонавтики’; k:=Length(S); Результат k=17

Функция Pos(S1,S2) – обнаруживает ПЕРВОЕ появление в строке S2 подстроки S1.

Результат – целое число. Пример: S2:=’комната’; k:= Pos(‘а’, S2); Результат k=5

Функция Ord(s1) - возвращает номер символьной переменой S1

Пример: S1:=’Д’; k:=Ord(S1); Результат k=196

Функция Chr(n)- возвращает номер символьной переменой S1

Пример: n:=196; S1:=Chr(n); Результат S1=’Д’

ПРОЦЕДУРЫ:

Процедура Delete(S,S2,N) –выполняет удаление N символов из строки S, начиная с позиции S2.

Пример: S:=’Победа’ ; Delete(S,1,2); Результат S=’беда’

Процедура Insert(S1,S2,n) –выполняет вставку строки S1 в строку S2, начиная с позиции n.

Пример: S2:=’Учиться интересно’; Insert(‘-очень-‘,S2,8);

Результат S2=’Учиться-очень- интересно’

Процедура Str(x:2, s) преобразовывает число в строку. Пример: x:=2.73284 s='2.73'

Процедура Val(s, x, Osh) преобразовывает строку в число. Параметр Osh должен иметь тип Integer. Пример: s='2.73' x:=2.73

Практическая работа «Строки 2»__________________вариант 3

1. Ввести с клавиатуры символьную строку: первый и второй множитель. Преобразовать их в число и вычислить произведение.

Пример: Введите строку: 821 609

Результат: 499989

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

Пример: Введите строку: Анна учит уроки обязательно.

Найдено слов: 11

Уровень С. Введите строку из 1 и 0 (8 штук) и дополните её последней цифрой, которая должна быть равна 1, если в исходной строке чётное число единиц, и равна 0, если нечётное (в получившейся строке должно всегда быть чётное число единиц).

Пример: Введите битовую строку: 01101010110

Ответ: 011010101100

Справочная информация:

ФУНКЦИИ:

Функция copy(S,Pos,N) – выделяет из строки S подстроку длиной в N символов, начиная с позиции Pos , где Pos – цифра;

Пример: s1:=‘пРОГресс’ ; s2:=copy(s1,2,3) ; Результат s2=’рог’

Функция concat(S1,S2,..,SN) – выполняет сцепление строк S1,S2,..,SN в одну строку

Пример: k:=Concat(‘До-’,’Ре-’,’Ми’); Результат k=‘До-Ре-Ми’

Функция Length(S) – определяет текущую длину строки S.

Пример: S:=’День космонавтики’; k:=Length(S); Результат k=17

Функция Pos(S1,S2) – обнаруживает ПЕРВОЕ появление в строке S2 подстроки S1.

Результат – целое число. Пример: S2:=’комната’; k:= Pos(‘а’, S2); Результат k=5

Функция Ord(s1) - возвращает номер символьной переменой S1

Пример: S1:=’Д’; k:=Ord(S1); Результат k=196

Функция Chr(n)- возвращает номер символьной переменой S1

Пример: n:=196; S1:=Chr(n); Результат S1=’Д’

ПРОЦЕДУРЫ:

Процедура Delete(S,S2,N) –выполняет удаление N символов из строки S, начиная с позиции S2.

Пример: S:=’Победа’ ; Delete(S,1,2); Результат S=’беда’

Процедура Insert(S1,S2,n) –выполняет вставку строки S1 в строку S2, начиная с позиции n.

Пример: S2:=’Учиться интересно’; Insert(‘-очень-‘,S2,8);

Результат S2=’Учиться-очень- интересно’

Процедура Str(x:2, s) преобразовывает число в строку. Пример: x:=2.73284 s='2.73'

Процедура Val(s, x, Osh) преобразовывает строку в число. Параметр Osh должен иметь тип Integer. Пример: s='2.73' x:=2.73

Практическая работа «Строки 2»__________________вариант 4

1. Ввести с клавиатуры символьную строку: уменьшаемое и вычитаемое. Преобразовать их в число и вычислить разность.

Пример: Введите строку: 821 609

Результат: 212

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

Пример: Введите строку: Анна учит уроки обязательно.

Найдено слов: обязательно

Уровень С. Введите битовую строку и дополните её последним битом, который должен быть равен 0, если в исходной строке чётное число единиц, и равен 1, если нечётное (в получившейся строке должно всегда быть чётное число единиц).

Пример: Введите битовую строку: 01101010110

Ответ: 011010101100

Справочная информация:

ФУНКЦИИ:

Функция copy(S,Pos,N) – выделяет из строки S подстроку длиной в N символов, начиная с позиции Pos , где Pos – цифра;

Пример: s1:=‘пРОГресс’ ; s2:=copy(s1,2,3) ; Результат s2=’рог’

Функция concat(S1,S2,..,SN) – выполняет сцепление строк S1,S2,..,SN в одну строку

Пример: k:=Concat(‘До-’,’Ре-’,’Ми’); Результат k=‘До-Ре-Ми’

Функция Length(S) – определяет текущую длину строки S.

Пример: S:=’День космонавтики’; k:=Length(S); Результат k=17

Функция Pos(S1,S2) – обнаруживает ПЕРВОЕ появление в строке S2 подстроки S1.

Результат – целое число. Пример: S2:=’комната’; k:= Pos(‘а’, S2); Результат k=5

Функция Ord(s1) - возвращает номер символьной переменой S1

Пример: S1:=’Д’; k:=Ord(S1); Результат k=196

Функция Chr(n)- возвращает номер символьной переменой S1

Пример: n:=196; S1:=Chr(n); Результат S1=’Д’

ПРОЦЕДУРЫ:

Процедура Delete(S,S2,N) –выполняет удаление N символов из строки S, начиная с позиции S2.

Пример: S:=’Победа’ ; Delete(S,1,2); Результат S=’беда’

Процедура Insert(S1,S2,n) –выполняет вставку строки S1 в строку S2, начиная с позиции n.

Пример: S2:=’Учиться интересно’; Insert(‘-очень-‘,S2,8);

Результат S2=’Учиться-очень- интересно’

Процедура Str(x:2, s) преобразовывает число в строку. Пример: x:=2.73284 s='2.73'

Процедура Val(s, x, Osh) преобразовывает строку в число. Параметр Osh должен иметь тип Integer. Пример: s='2.73' x:=2.73