Ответ(ы) на вопрос:
Гостьuses crt;
var
s: String;
k: Word;
begin
clrscr;
WriteLn('Введите слово');
ReadLn(s);
WriteLn('Введите номер символа, который нужно удалить');
ReadLn(k);
delete(s, k, 1);
WriteLn('Вот что получилось = ', s);
ReadLn;
end.
Не нашли ответ?
Похожие вопросы