Вычеркните i-ю букву слова. написать программу в паскале

Question

Вычеркните i-ю букву слова.
написать программу в паскале

Answer 1

Var a:string;
i,n:integer;
begin
write('Введите слово ');
readln(a);
n:=length(a);
writeln('Введите номер буквы ');
readln(i);
delete(a,i,1);
writeln(a);
readln;
end.

Comments

да ничего)) спасибо за помощь