Впаскале решите : ) 1. в строке слова разделены пробелами. определить на какую букву оканчивается четвертое слово в предложении. 2.дана последовательность слов. напечатать те слова последовательности, которые отличны от первого слова и удовлетворяют следующему свойству: в слове нет повторяющихся букв.
1) Pascal ABC.NET
var s:string; p:boolean; i,k:integer;
begin
p:false;
k:=0;
read(s);
for i:=1 to lenth(s) do
begin
if s[i]=' ' then inc(k);
if k=5 then p:=true else p:=false;
if p then writeln(s[i-1]);
end;
end.
вторая задачи без компа сложная, прости, нужно компилить и проверять