1.С клавиатуры вводится слово,распечатать все его буквы через пробел.(после последней...

Question

1.С клавиатуры вводится слово,распечатать все его буквы через пробел.(после последней буквы пробела быть не должно).
2.Написать программу,которая удаляет первое слово из строки введенной с клавиатуры и вместо него вставляет заданное.

Comments

Відповідь обовязково сьогодні потрібна чи можна написати завтра?

---

На Паскалі підійде?

---

да,паскаль

---

сегодня надо

---

На JavaScript смог бы написать... а вот на паскале, подожди немножко

---

а, не.... только js .... паскаль не идет у меня)

---

очень жаль

Answer 1

1)
var
a:string;
i,n:integer;
begin   
     readln(a);   
     n:=length(a);   
         for i:=1 to n do       
            write(' ',a[i]);
end.
2)
var
a,b:string;
i,n,d:integer;
begin 
   Writeln('введите строку');
   readln(a); 
   n:=length(a);   
   d:=pos(' ',a);   
   Delete(a, 1,d-1);   
   writeln('введите слово для замены');
   readln(b); 
   Insert(b, a,1);   
   writeln;   
   writeln(a);
end.