Var a, b: string;

begin

writeln('введите два слова'); readln (a); readln (b);{ ввод слов }

if length(a)>length(b) then writeln(a) else writeln(b);

end.

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

Алгоритм основан на определении номера последнего символа k (длины) слова а и проверке выполнения условия a[k]=b[1].

Программа может выглядеть так:

Program Prim3_5;

Var a, b: string; k : integer;

begin

writeln('введите два слова'); readln (a); readln (b); { ввод слов }

k:=length(a); { длина (номер последнего символа) слова а }

if a[k]=b[1] then writeln('Да') else writeln('Нет');

end.

Сравнение строк выполняется посимвольным сравнением кодов соответствующих символов до первого несовпадения. Строки считаются равными, если все символы в них совпадают. Из двух строк “меньшей” считается та, в которой первый отличающий символ имеет код меньше, чем соответствующий символ другой строки Заметим, что прописные буквы “больше” заглавных. Так, строка ‘стол’ меньше строки ‘стул’ (первые два символа совпадают, третий символ 'о’<‘у’. Строка ‘teacher’ больше строки ‘pupil’, ‘паровоз’ меньше строки ‘пароход’, Сравнивать можно строки и разной длины. Так, строка ‘пар’ меньше строки ‘парад’, 'стол' < 'столик’, '12' <'2' , 'ABC' <'ADBA’.

Например:

S1:=’мотоцикл’; S2:=’мотоблок’;

If S1>S2 then Writeln (S1, ’ больше, чем ‘ , S2);

Этот фрагмент программы выведет на экран надпись «мотоцикл больше, чем мотоблок»

5 Индивидуальное задание

1. Составьте программу, которая выводит на экран названия трех геометрических фигур, которые вводятся с клавиатуры. Например, Геометрические фигуры: квадрат, ромб, круг.

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

3. Составьте программу, которая выполняет сравнение двух слов, введенных с клавиатуры, и выводит на экран большее

4. Составьте программу, которая проверяет, что строка не начинается и оканчивается на одну и ту же букву и определяет, четно или нечетно количество символов в строке

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

Примечание. Выполните программы при различных значениях переменных: запустите программу на выполнение (Ctrl-F9); введите данные; после того как опять появится текст программы (т.е. программа выполнена), нажмите Alt-F5 для просмотра результатов (для возврата — любую клавишу)

6 Содержание отчета (в электронном виде)

6.1 Создание новых файлов

6.2 Сохранение новых файлов в своей рабочей папке

6.3 Демонстрация выполненной работы преподавателю

7 Контрольные вопросы

7.1 Поясните, в чем особенность ввода значений строковых переменных

7.2 Перечислите какие действия можно выполнять над строковыми переменными

7.3 Поясните как вывести на экран слово «камп’ютар»

7.4 Расскажите какую функцию используют для определения длины слова

7.5 Поясните, в чем заключается операция сравнения строк. Какая из двух строк считается большей

7.6 Определите какие утверждения верны и почему:

а) ‘ДОМ’ > ‘ДОРОГА’; б) ‘человек’ > ‘ЧЕЛОВЕК’; в) ‘123’ < ‘40’;

г) ‘шалаш’ > ‘дворец’; д) ‘1000’ > ‘15’; е) ‘D’<=’G’; ж) ‘ffff’=’fff’

Справочная литература

1 Павловский, А.И. Информатика: Учебное пособие для 10-го кл. / А.И. Павловский, А.Е. Пупцев – Минск : Народная асвета, 2000

2 Пупцев, А.Е. Информатика: Учебное пособие для 11-го кл. / А.Е. Пупцев [и др.] – Минск : Народная асвета, 2008

7