Переменной А присвоить ее значение, увеличенное в N раз, 2N раз, 3N раз - VB
Формулировка задачи:
Переменной А присвоить ее значение, увеличенное в N раз, 2N раз, 3N раз
Решение задачи: «Переменной А присвоить ее значение, увеличенное в N раз, 2N раз, 3N раз»
textual
Листинг программы
Option Explicit Dim N As Integer Dim A As Single Dim tempA As Single Dim mn As Integer ' множитель Private Sub Form_load() A = InputBox("Введите значение A") N = InputBox("Введите значение N?") mn = 1 tempA = A End Sub Private Sub Command1_Click() A = tempA * N * mn Print tempA; " *"; mn; " *"; N; " ="; A mn = mn + 1 ' увеличение множителя End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д