s[length(s)-1];https://learningapps.org/5185032
Прочитать
Для хранения строк текста в языке Pascal используются переменные типа string. Одна переменная этого типа может хранить строку длиной до 255 символов.
Значениями типа string могут быть строки любых символов, заключенные в одинарные кавычки, например: 'школа', ' Аполлон', '3', ' Pascal ABC'. Если кавычка должна входить в состав строки, то её следует повторить дважды, например: ' на Pascal' ' е'.
К каждому символу строки можно обратиться по его номеру как к элементу массива.
Кроме того, к строкам применима операция «+», которая позволяет склеивать две строки в одну.
Операция соединения (слияния) строк обозначается знаком "+", например: 'пар'+ 'о' +'ход' дает в результате 'пароход'
Пусть s, s1 и s2 - переменные строкового типа. В результате выполнения операторов s1:='пар'; s2:='воз'; s:=s1+'о'+s2; в переменную s запишется слово 'паровоз'.
Если в операции слияния поменять местами переменные s1 и s2 местами: s:=s2+'о'+s1; то в переменной s окажется слово 'возопар'.
Строки можно сравнивать между собой, например:
'ABC' < 'ВВС' True (ист)
'стул' < 'стол' False (ложно)
'3' > '14' True (ист)
Сравнение строк происходит по следующему правилу.
Сначала сравниваются коды первых символов строк, какой код больше, та и строка больше.
Если коды первых символов равны, то сравниваются коды вторых символов. У какого из вторых символов код больше, та и строка больше.
Если коды и вторых символов равны, то сравниваются коды третьих символов и т. д.
Если при сравнении одна из строк закончилась, то большей строкой считается более длинная.
Скопировать и порешать
Пример 1. Дана строка. Написать программу для вывода на экран первой буквы строки.
Var s:string;
begin
read(S);
write(s[1]);
end.
Пример 2. Даны две строки. Написать программу для вывода на экран слова, полученного из суммы первых букв данных строк.
Var a,b,s:string;
begin
read(a);
read(b);
s:=a[1] +b[1];
write(s);
end.
НАБРАТЬ и выучить
Длину строки можно узнать с помощью функции length.
Пример 3. Дана строка. Написать программу, выводящую на экран её длину.
Var s:string;
begin
read(s);
writeln(length(s));
end.
Пример 4. Дана строка. Написать программу, выводящую на экран слово, составленное из первой и последней букв данной строки.
Var s, rez: string;
begin
read(s);
rez:=s[1] + s[length(s)];
write(rez);
end.
Комментариев нет:
Отправить комментарий