Задать вопрос
ИнформатикаИнформатика
31 октября, 02:09

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

+5
Ответы (1)
  1. 31 октября, 04:32
    0
    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)
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Составьте алгоритм и программу находящию сумму делителей заданного числа. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Главная » Информатика » Составьте алгоритм и программу находящию сумму делителей заданного числа.
Регистрация Забыл пароль