Написать программу которая вставляет на выбранную позицию в тексте буквы от a до z - Pascal ABC
Формулировка задачи:
Всем привет , помогите написать программу которая будет вставлять буквы от A до Z в слово из 15 букв на выбранное место и на каждой строке
пример : в слове door нужно вставить буквы на 3 позицию со cдвигом и каждый вариант новой строки
Решение задачи: «Написать программу которая вставляет на выбранную позицию в тексте буквы от a до z»
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.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д