Составьте алгоритм и программу находящию сумму делителей заданного числа.

Utugav Utugav    3   29.05.2019 13:40    0

Ответы
круголс круголс  28.06.2020 16:00
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)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика