Rosetta Code

Changeable words: Difference between revisions

← Older editNewer edit →
Content deleted Content added
m →‎{{header|REXX}}: changed some whitespace and comments.
Petelomax (talk | contribs)
7,878 edits
Line 288:
=={{header|Phix}}==
<lang Phix>function changeable(string a, b)
ifreturn length(a)!=length(b) thenand return false end ifsum(sq_ne(a,b))=1
bool diff = false
for i=1 to length(a) do
if a[i]!=b[i] then
if diff then return false end if
diff = true
end if
end for
if not diff then ?9/0 end if
return true
end function
 
Retrieved from "https://rosettacode.org/wiki/Changeable_words"