Примеры решения задач со строковыми данными.

1. Установить: какие типы должны иметь переменные в приведенном фрагменте про­граммы и какие значения они примут после выполнения операций.

s:='ситуация';

st^'ya';

a:=Length(s+'' +st);

n:=Pos(st,s);

insert(st,s,6);

delete(s,4,2);

st:=copy(s,l,3)+ copy(s,7,l);

2. Написать программу, которая из двух строковых констант "КЛАССШКОЛА" и "АБВГДМО 123456789" выводит на экран 2 строки, содержащие номер школы и литеру класса, определяет длину этих полученных строк. Например:

ШКОЛА N7

КЛАСС 9Б

Решение. program zada2;

CONST А='КЛАССШКОЛА';

В='АБВГДМ0123456789';

varSl,S2:string;

begin S 1:=^:copy(A,6,5)+' '+copy(B,6,1)+сору(В, 14,1);

S2:=copy(A,l,5)+ • • +copy(B,Length(B),l)+copy(B,2,l);

writeln(Sl,S2);

end.

3. Из перечисленных ниже слов составить и вывести на экран любые новые слова, бу­квы которых идут в исходных словах не подряд. Значения слов задаются как констан­ты.

ФОРМАТИРОВАНИЕ

ПОСЛЕДОВАТЕЛЬНОСТЬ Из первого слова можно составить слово

'MOPTHPA'^M'+'OP'+THP'+'A' Из второго слова можно составить слово

•HOnEHO^'nO'+'nE'+'HO'

4. Составить программу, при выполнении которой на экран дисплея выводится во­прос:

Как тебя зовут?

После ввода с клавиатуры своего имени (.......), на экране дисплея должна появиться

строка

Здравствуй,.........!

вместо многоточия должно стоять введенное имя.

5. Составить программу выделения каждого слова в предложении, состоящем из двух слов, разделенных пробелом. Исходные данные.

S - предложение (строка) - вводится с клавиатуры. Результат:

51 - первое слово,

52 - второе слово. Алгоритм решения.

Определить позицию пробела. А и В - вспомогательные целочисленные переменные..

6. Написать программу, которая вводит слово и новое окончание, а затем заменяет в этом слове старое окончание на новое. Вывести новое слово. Исходные данные.

а - слово, Ь - окончание вводятся с клавиатуры. Результат.

с - новое слово.

Алгоритм решения.

h - длина окончания. Удалить во введенном слове h символов с конца и сцепить с новым окончанием.

Графический экран

Не нашли, что искали? Воспользуйтесь поиском: