Составить программу, позволяющую вставить после каждого символа исходной строки пробел и вывести полученную строку на экран

Question

Информатика

Петряха

22 ноября, 20:11

Составить программу, позволяющую вставить после каждого символа исходной строки пробел и вывести полученную строку на экран

+2

Ответы (2)

Знаете ответ на вопрос?

Тотя · Answer 1

Program gt;

var a:string;

l, i:longint;

begin

readln (a) ;

l:=length (a) ;

for i:=1 to l do

begin

write (a[i],' ') ;

end;

end.

Августа · Answer 2

Var s, t: string;

i: integer;

begin

write ('Введите строку: ') ; read (s) ;

t:='';

for i:=1 to length (s) do

t:=t+s[i]+' ';

writeln ('Результат: ', t) ;

end.