dit is een steekproefcode
Schemerig S1 als Koord = „abc“
Schemerige s2 als Koord = „abgc“
Schemerige diffcnt als Geheel = 0
Voor Elk c als Klusje in S1
Als niet s2.Contains (c) Dan
diffcnt = diffcnt + 1
Eind als
Daarna
Voor Elk c als Klusje in s2
Als niet S1. Bevat (c) Dan
diffcnt = diffcnt + 1
Eind als
Daarna
Response.Write (diffcnt & de „brief is verschillend“)