Создать программу, которая будет убирать по одной букве с начала слова - Pascal ABC
Формулировка задачи:
Написать программу, которая слово "комната" напечатает в столбик, сначала убирая по одной букве с начала слова, затем убирая по одной последней букве, затем просклонять это слово по падежам.
Пример:
Комната
омната
мната
ната
ата
та
а
Решение задачи: «Создать программу, которая будет убирать по одной букве с начала слова»
textual
Листинг программы
var s:string; begin s:='Комната'; while length(s)>0 do begin writeln(s); delete(s,1,1); end; s:='Комната'; while length(s)>0 do begin writeln(s); delete(s,length(s),1); end; s:='Комната'; writeln(s); s[length(s)]:='ы'; writeln(s); s[length(s)]:='е'; writeln(s); s[length(s)]:='у'; writeln(s); s:=copy(s,1,6)+'ой'; writeln(s); s:='о '+copy(s,1,6)+'е'; writeln(s); s[1]:='в'; writeln(s); end.
Объяснение кода листинга программы
- Создается переменная s типа string, которая инициализируется значением 'Комната'.
- Запускается цикл while, условием которого является длина строки s больше 0.
- Внутри цикла выводится значение переменной s.
- Вызывается функция delete(s,1,1), которая удаляет символ с начала строки s.
- Повторно запускается цикл while, условием которого является длина строки s больше 0.
- Внутри цикла выводится значение переменной s.
- Вызывается функция delete(s,length(s),1), которая удаляет символ с конца строки s.
- Выводится значение переменной s.
- Выделяется последний символ строки s с помощью оператора [length(s)].
- Значение последнего символа присваивается переменной s.
- Выводится значение переменной s.
- Выделяется первый символ строки s с помощью оператора [1][length(s)].
- Значение первого символа присваивается переменной s.
- Выводится значение переменной s.
- Выделяется средний символ строки s с помощью оператора [1+(length(s)/2)].
- Значение среднего символа присваивается переменной s.
- Выводится значение переменной s.
- Строка s преобразуется с помощью оператора copy(s,1,6)+'ой', чтобы добавить к началу строки 'ой'.
- Выводится значение переменной s.
- Строка s преобразуется с помощью оператора s[1]+='в', чтобы добавить к началу строки 'в'.
- Выводится значение переменной s.
- Программа завершается.