Question

ПОМОГИТЕ, ПОЖАЛУЙСТА! ЛЁГКАЯ ЗАДАЧА ПО ПАСКАЛЮ!!! Дан текст, слова которого разделены одним пробелом.
После последнего слова стоит точка.
Удвоить все пробелы этого текста.

Answer 1

Понятия не имею, зачем тут про точку, программа работает, есть эта точка или нет её.

var
  s:string;
  i:integer;
begin
  Write('Введите строку: '); Readln(s);
  for i:=Length(s) downto 1 do
    if s[i]=' ' then Insert(' ',s,i);
  Writeln(s)
end.

Пример
Введите строку: А роза упала на лапу Азора
А  роза  упала  на  лапу  Азора