VB. Dim n as Integer n=InputBox("Число:") Dim Summ as Integer Dim i as Integer
For i= 1 to n If n mod i = 0 then Summ=Summ i Next
MsgBox (Summ)
более месяца назад
Ваш ответ:
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.