напишите пожалуйста программу...

[покемон21]

напишите программу обработки строки в соответствии с вариантом задания.ввод строк организуйте в программе.строка должна состоять из нескольких слов и символов,разделителем служит пробел.выведите на экран обратную строку.

задание:подсчитайте в строке количество иностранных слов

[Stilet]

Пример строки в студию.

[покемон21]

Сообщение от Stilet

Пример строки в студию.

program stroka;
var st,subst :string;
begin
writeln ('введите строку');
readln(st)
ддальше не знаю...

[ZX Spectrum-128]

Если я правильно понял, имелась ввиду строка с примером. В прошлый раз иностранными словами у вас были copy, concat и т.д.
А сейчас какие слова иностранные?
Кстати, чем вам не подошло мое решение?

[Endok70]

program perevertishi;
uses CRT;
var st,subst,b:string;
i,g:integer;
begin
Writeln('Введите слово');
Readln(st);
i:=Length(st);
For i:=i downto 1 do
begin
b:=st[i];
subst:=subst+b;
end;
Writeln(subst);
end.

я ее чуть изменил, но кажется это тоже подходит