Введите строку с экрана. Выведите её длину. Добавьте после второго символа символ «о», удалите из строки последний символ. Выведите на экран результирующую строку. Приложите исходный код (*.pas) и скомпилированный файл (*.exe).
Введите строку с экрана. Выведите её длину. Добавьте после второго символа символ «о», удалите из строки последний символ. Выведите на экран результирующую строку. Приложите исходный код (*.pas) и скомпилированный файл (*.exe).
Ответ(ы) на вопрос:
program TxtManipula;
uses crt;
var txt:string;
begin Writeln('Введите строку');
Readln(txt);
Writeln('Длина строки:',length(txt));
Insert('о',txt,2);
Writeln(txt);
Delete (txt.length(txt),1);
Writeln(txt);
Readln();
end.
PS: скомпилированный файл TxtManipula.exe в архиве, это вставленный документ ворд. Просто поменяй расширение docx на zip.
Не нашли ответ?
Похожие вопросы