Question

Составить программу вычисления значения k. Дано: k:=0 Начало цикла для i от 1 до 3 K:=k+2 Конец цикла. Ввод k

Answer 1

Dim k As IntegerDim i As Integerk = 0For i = 1 To 3k = k + 2Cells(i, 2) = kNext