for_flr

powershell练习一下题目。千字文保存为qzw.txt

$txt=(gc qzw.txt).split()|?{$_ -ne ""}
$dic=@{}
foreach($w in $txt){
	for($i=0;$i -le 3;$i++){
		if (!$dic.containskey($w[$i])){
		$dic[$w[$i]]=1
		} else {
		$dic[$w[$i]]+=1
		}
	}
}
write-host "千字文中有以下重复字"
$dic.getenumerator()|?{$_.value -gt 1}
[console]::readkey()
复制代码