Описание переменных:
str - строка;
len - длина строки;
a - длина очередного слова;
i - текущая позиция в строке.
Алгоритм решения задачи:
Будем перебирать символы строки с конца и измерять количество подряд идущих непробельных символов. Если очередной символ - пробел, то следует вывести на экран отрезок строки от предыдущего с конца символа на длину подряд идущих непробельных символов. Это делается с функции copy(). После того как слово будет выведено, надо обнулить фиксируемую длину слова.
Поскольку вывод слова "срабатывает", только когда встречается пробел, то первое слово строки (последнее из найденных при поиске с конца) выведено не будет, если перед ним нет пробела. Поэтому в программе за циклом предусмотрен отдельный вывод последней найденной подстроки.
Программа на языке Паскаль:
var
str: string;
len, i, a: byte;
begin
readln(str);
len := length(str);
a := 0;
for i:=len downto 1 do begin
if str[i] = ' ' then begin
write(copy(str,i+1,a),' ');
a := 0;
end
else
a := a + 1;
end;
write(copy(str,i,a));
writeln;
end.
Пример работы программы:
11 22 33 44 55
55 44 33 22 11
Объяснение:
но я точно не знаю я старался как мог я искал и нашел кажется
1) G8:G13
2) 16 * 3 = 48
3) G11:H15
4) E8:G12