Первое слово заменяет последним. С клавиатуры вводится строка, состоящая из четырех слов (Pascal)
Ответы
Ответ дал:
0
( PascalABC )
var s,tmp1,tmp2: string;
var i: integer;
begin
write('Введите строку: ');
readln(s);
tmp1:=s.Substring(0,s.IndexOf(' '));
tmp2:=s.Substring(s.LastIndexOf(' ')+1);
s:=s.Remove(0,s.IndexOf(' '));
s:=s.Replace(tmp2,tmp1);
s:=tmp2+s;
write('Результат: ',s);
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад