Напишите программу проверки умения умножения однозначного на двузначное число - VB
Формулировка задачи:
Напишите программу проверки умения умножения однозначного на двузначное число. Программа должна вывести 10 примеров и выставить оценку: за 10 правильных - (Отлично), за 9.8-(Хорошо),за 7.6(Удовлетворительно),за 5 и менее-(плохо). Используйте цикл с предусловием с ключевым словом While.
Решение задачи: «Напишите программу проверки умения умножения однозначного на двузначное число»
textual
Листинг программы
Sub main() Dim i&, n&, a&, b& While i < 10 i = i + 1 a = 1 + Int(Rnd() * 9) b = 10 + Int(Rnd() * 90) If a * b = InputBox("Пример " & i & " из 10" & vbLf & vbLf & a & "*" & b & "=") Then n = n + 1 Wend If n = 10 Then MsgBox "Отлично" ElseIf n > 7 Then MsgBox "Хорошо" ElseIf n > 5 Then MsgBox "Удовлетворительно" Else: MsgBox "Плохо" End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д