Составьте программу, которая дописывает одну строку в начало другой, не используя операции склейки или функции конкатенации — Pascal(Паскаль)

Program PascalGuru;
 
var s,x:string;
    i:integer;
 
{----------------------------------}
begin
write('Vvedite stroky1: '); readln(s);
write('Vvedite stroky2: '); readln(x);
 
Insert(x, s, 1); {реализовываем с помощью вставки}
 
writeln;
writeln('Stroka1: ',s);
 
readln;
end.      

Leave a Comment

93 − 84 =