Написать программу которая вставляет на выбранную позицию в тексте буквы от a до z - Pascal ABC

Формулировка задачи:

Всем привет , помогите написать программу которая будет вставлять буквы от A до Z в слово из 15 букв на выбранное место и на каждой строке пример : в слове door нужно вставить буквы на 3 позицию со cдвигом и каждый вариант новой строки

Код к задаче: «Написать программу которая вставляет на выбранную позицию в тексте буквы от a до z - Pascal ABC»

textual
var s:string;
    b:char;
    p:integer;
begin
    write('строка: ');readln(s);
    repeat
     write('позиция: <=',length(s)+1,' ');readln(p);
    until p<=length(s)+1; 
    for b:='A' to 'Z' do 
     begin 
      insert(b,s,p);
      writeln(s);
      delete(s,p,1)
     end 
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.

12   голосов, оценка 4.083 из 5


СДЕЛАЙТЕ РЕПОСТ
Похожие ответы