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

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

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


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

Могу толко написать программу, в которой последние символы строки должны стать первыми, а первые последними.
uses crt;
var d,d1:string;
i:integer;
begin
writeln ('Введите слово или предложение');r
eadln(d);d1:='';
for i:=length(d)downto 1 do d1:=d1+d[i];d:=d1;
writeln(d);
end.

(205 баллов)