Sub aaa()
s = 0: sign = 1
i = 1
Do While i <= 100
s = s + sign * i
sign = -sign
i = i + 1
Loop
MsgBox s
End Sub
В результате будет получено значение -50.
Алг Сумма
нач
цел s,i
s:=0
нц для i от 100 до 300
если mod(i,3) = 0 то
s:=s+i
все
кц
вывод "s = ", s
кон
Ответ:
42
Объяснение:
2A(16)= 2* 16 + 10=42(10)
44(8) = 4*8 + 8 = 40(10)
100111(2) = 32+4+2+1=39(10)