Задача в Delphi: "Дана строка. Вывести первые три символа и последние три символа"

Question

Задача в Delphi: "Дана строка. Вывести первые три символа и последние три символа"

Alex Знаток (451), закрыт 7 лет назад

Доброе утро, господа. Необходима Ваша помощь по решению этого вопроса, вроде как и не сложно, но в Delphi только-только начал разбираться, навыков нет, а задания сделать нужно. Рассчитываю на Вашу помощь, спасибо за Ваше внимание и время.

Answer 1

Miku Hatsune Мудрец (11190) 7 лет назад

А можно и без copy
writeln(s[1], s[2], s[3]);
writeln(s[length(s)-2], s[length(s)-1], s[length(s)]);

Alex Знаток (451) 7 лет назад

Могли бы Вы скинуть полный вариант кода? Это очень поможет мне в решении задачи..

Miku Hatsune Мудрец (11190) Я еду на работу, так что извини

Answer 2

Если именно Delphi, то там есть функции copy (копирование подстроки) и length (для определения количества символов в строке):
http://www.delphibasics.ru/Copy.php
http://www.delphibasics.ru/Length.php