Лекция 2. Основы программирования. Линейные и разветвляющиеся структуры

Лекция 2. Основы программирования. Линейные и разветвляющиеся структуры

3. Линейные вычислительные процессы Пример. Заданы произвольное целое число х и число y = 3,45. Вычислить их сумму и произведение. 2 ГСА

3. Линейные вычислительные процессы 3 Программный код Option Explicit Sub Primer () ‘начало процедуры Dim x As Integer, y As Single ‘описание переменных Dim S As Single, P As Double x = Val(InputBox("Введите x")) ‘ввод числа х Y = 3.45 S= x + y ‘вычисление суммы Debug.Print S ‘проверка результата P = x * y ‘вычисление произведения MsgBox (“S=" & S) ‘вывод в диалоговое окно Cells(1, 2) = “P=“ ‘вывод в ячейку Excel Cells(1, 3) = P End Sub