Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
21
Task/Sierpinski-triangle/PowerShell/sierpinski-triangle.psh
Normal file
21
Task/Sierpinski-triangle/PowerShell/sierpinski-triangle.psh
Normal file
|
|
@ -0,0 +1,21 @@
|
|||
function triangle($o) {
|
||||
$n = [Math]::Pow(2, $o)
|
||||
$line = ,' '*(2*$n+1)
|
||||
$line[$n] = '█'
|
||||
$OFS = ''
|
||||
for ($i = 0; $i -lt $n; $i++) {
|
||||
Write-Host $line
|
||||
$u = '█'
|
||||
for ($j = $n - $i; $j -lt $n + $i + 1; $j++) {
|
||||
if ($line[$j-1] -eq $line[$j+1]) {
|
||||
$t = ' '
|
||||
} else {
|
||||
$t = '█'
|
||||
}
|
||||
$line[$j-1] = $u
|
||||
$u = $t
|
||||
}
|
||||
$line[$n+$i] = $t
|
||||
$line[$n+$i+1] = '█'
|
||||
}
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue