S, P, a, b, h, S1, S2, P_осн S, P, a, b, h, S1, S2, P_осн Может состоять из символов латинского, русского алфавита, включать цифры. Не может начинаться с цифры. Записывается без пробелов.
InputBox()- позволяет вводить данные с помощью диалогового окна ввода InputBox()- позволяет вводить данные с помощью диалогового окна ввода a=InputBox(“Введите длину”)
Print “Площадь=“; S Print “Площадь=“; S
1.Объявляем переменные 1.Объявляем переменные 2.Вводим данные 3.Записываем формулы для решения 4.Выводим данные
Private Sub Комманда1_Click() Private Sub Комманда1_Click() Dim a As Single Dim b As Single Dim p As Single Dim s As Single a = InputBox("Введите длину") b = InputBox("Введите ширину") p = 2 * a +2 * b s = a * b Print "Периметр ="; p Print "Площадь ="; s End Sub