задача на Паскале. Тема: строковый тип.

[TOCMYANINA]

1)в строке заменить все пробелы, стоящие на нечетных позициях на двойные пробелы.



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

[Анатоль]

Напишу 1ую. 2ую в лом чёто.
program stroka;
var
s,s2 : ansistring;
i,sc : longint;
begin
readln(s);
s2 := ' ';
i := 1;
while i <= length(s) do
begin
if ((i mod 2) = 1) and (s[i] = ' ') then
begin
insert(s,s2,i);
inc(i);
end
else
inc(i);
end;
writeln(s);
end.
Если пишешь не на FPC, то замени ansistring на просто string.

[TOCMYANINA]

спасибки и за одну.