Помогите решить задачу по VBA. Дана строка, вывести после каждого символа пробел.

0 голосов
30 просмотров

Помогите решить задачу по VBA. Дана строка, вывести после каждого символа пробел.


Информатика (57 баллов) | 30 просмотров
Дан 1 ответ
0 голосов

Ответ:

Var s:string;

   i:byte;

Begin

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

   For i:=Length(s) downto 1 do

    Insert(' ',s,i+1);

   writeln('Полученная строка = ',s);

   readln;

End.

(26 баллов)