Суть : составьте блок-схему и программу на языке vba, которая вычисляет сумму первых n целых положительных четных чисел. количество суммируемых чисел должно вводиться во время работы программы. программа должна проверять правильность введенных пользователем данных и, если они неверные ( n ≤ 0 ), выдавать сообщение об ошибке. буду признательна, если кто-нибудь возьмется за это . )
Dim n As Integer
Do While n < 1
n = InputBox("N=")
If n < 1 Then MsgBox ("Ошибка ввода. Повторите.")
Loop
For i = 1 To n
s = s + 2 * i
Next i
MsgBox ("s=" & s)
End Sub