Rate counter: Difference between revisions

Content added Content deleted
(→‎{{header|XPL0}}: added zkl)
No edit summary
Line 1,032: Line 1,032:
<pre>1.761 sec
<pre>1.761 sec
-> "a"</pre>
-> "a"</pre>

=={{header|PowerShell}}==
<lang PowerShell>
[datetime]$start = Get-Date

[int]$count = 3

[timespan[]]$times = for ($i = 0; $i -lt $count; $i++)
{
Measure-Command {0..999999 | Out-Null}
}

[datetime]$end = Get-Date

$rate = [PSCustomObject]@{
StartTime = $start
EndTime = $end
Duration = ($end - $start).TotalSeconds
AverageRunTime = ($times.TotalSeconds | Measure-Object -Average).Average
}

$rate | Format-List
</lang>
{{Out}}
<pre>
StartTime : 10/27/2016 3:33:16 PM
EndTime : 10/27/2016 3:33:30 PM
Duration : 13.9062588
AverageRunTime : 4.63301593333333
</pre>


=={{header|PureBasic}}==
=={{header|PureBasic}}==