Ввести строку. Вывести ВТОРУЮ половину строки - Pascal ABC
Формулировка задачи:
Ввести строку. Вывести ВТОРУЮ половину строки.
Пытался делать через функцию Length,но все ровно не понимаю как. Задача вроде не сложная,но пока не выходит ничего. Интересно разобраться в ней!
Решение задачи: «Ввести строку. Вывести ВТОРУЮ половину строки»
textual
Листинг программы
var st : string;
n : byte;
BEGIN
WriteLn('Введите строку:');
ReadLn(st);
n:= Length(st);
n:= Trunc(n/2);
Delete(st, 1, n);
WriteLn(st);
END.