Random sentence from book: Difference between revisions

Content added Content deleted
(Promote to full task status)
m (→‎{{header|Phix}}: account() the last slice)
Line 540: Line 540:
end procedure
end procedure


for i=2 to length(words)-1 do
for i=2 to length(words) do
if find(words[i],{".","?","!"}) then
if find(words[i],{".","?","!"})
and i<length(words) then
words[i+1] = lower(words[i+1])
words[i+1] = lower(words[i+1])
end if
end if