Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- do
- { $o=Read-Host "Введите максимальное число"
- }While($o -eq 0)
- While("TRUE"){
- if((Get-Random -Maximum 2) -eq 1){
- do
- { $a=Get-Random -Maximum $o
- }while($a -eq $o)
- $b=Get-Random -Maximum ($o-$a)
- Write-Host "Решите пример "$a"+"$b
- $e=Read-Host "Введите ответ"
- if($e -eq ($a+$b))
- { $t=$t+1 ; $s=[math]::round($t/($t+$f)*100,0) ; Write-Host "ответов правильных "$t" неправильных "$f" итог "$s"%"
- Write-Host "Правильно"
- }else
- { Write-Host "Неправильно, попробуйте ещё раз "$a"+"$b
- $e=Read-Host "Введите ответ"
- if($e -eq ($a+$b))
- { $t=$t+1 ; $s=[math]::round($t/($t+$f)*100,0) ; Write-Host "ответов правильных "$t" неправильных "$f" итог "$s"%"
- Write-Host "Правильно"
- }else
- { $f=$f+1 ; $s=[math]::round($t/($t+$f)*100,0) ; Write-Host "ответов правильных "$t" неправильных "$f" итог "$s"%"
- Write-Host "Неправильно , следующий пример"
- }
- }
- }
- else{
- do
- { $a=Get-Random -Maximum $o
- }while(-Not $a)
- $b=Get-Random -Maximum $a
- Write-Host "Решите пример "$a"-"$b
- $e=Read-Host "Введите ответ"
- if($e -eq ($a-$b))
- { $t=$t+1 ; $s=[math]::round($t/($t+$f)*100,0) ; Write-Host "ответов правильных "$t" неправильных "$f" итог "$s"%"
- Write-Host "Правильно"
- }else
- { Write-Host "Неправильно, попробуйте ещё раз "$a"-"$b
- $e=Read-Host "Введите ответ"
- if($e -eq ($a-$b))
- { $t=$t+1 ; $s=[math]::round($t/($t+$f)*100,0) ; Write-Host "ответов правильных "$t" неправильных "$f" итог "$s"%"
- Write-Host "Правильно"
- }else
- { $f=$f+1 ; $s=[math]::round($t/($t+$f)*100,0) ; Write-Host "ответов правильных "$t" неправильных "$f" итог "$s"%"
- Write-Host "Неправильно , следующий пример"
- }
- }
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement