Обобщающее занятие по теме «Алгоритмы обработки строковых величин»

Задача. Заменить в тексте слово «ноябрь» на «декабрь».  Слова в тексте отделяются друг от друга пробелами. В конце текста тоже стоит пробел.

var s:string;

    ns:integer;

begin

  readln(s);

  ns:=pos('... ',s);{ищем  слово, которое будем заменять}

  while ns>0 do {повторяем действия пока в тексте есть это слово}

             begin

             ... {удаляем слово}

             ...('...',s,...);{вставляем новое слово}

             ...{ищем снова слово}   

            end;

writeln(s);                          

end.

ТЕСТ

ПРАКТИЧЕСКАЯ ЧАСТЬ

Задание 1. Запустите Паскаль.

 

Задание 2. Выполнить программу. Определить, что она делает.

var s, i: string;

     np:integer;

begin

    writeln('Введите имя и фамилию в строку через пробел');

    readln(s);

    np:=pos(' ',s);

    i:=copy(s,1,np-1);

    writeln(i);

end.

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

Пример: 

Ввод: 17 мая

Вывод: 17 

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

Пример: 

Ввод: 17.11.2005

Вывод: 2005

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