Ответы
Ответ дал:
0
var a:string;
i,n:integer;
begin
write('Введите слово ');
readln(a);
n:=length(a);
writeln('Введите номер буквы ');
readln(i);
delete(a,i,1);
writeln(a);
readln;
end.
i,n:integer;
begin
write('Введите слово ');
readln(a);
n:=length(a);
writeln('Введите номер буквы ');
readln(i);
delete(a,i,1);
writeln(a);
readln;
end.
Ответ дал:
0
простите , что долго добавила решение ...просто решала и другие вопросы ))
Ответ дал:
0
да ничего)) спасибо за помощь
Ответ дал:
0
не за что))
Ответ дал:
0
была рада помочь )0
Вас заинтересует
2 года назад
8 лет назад
8 лет назад
10 лет назад
10 лет назад