Информационный объём текста, подготовленного с
компьютера, равен 1 Мб. 1символ весит
1 байт. Сколько символов содержит этот
текст?​

Пример на c#:
int a;
int b;
int c;
int d;
Console.WriteLine("Введите стоимость перчаток");
a = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите стоимость портфеля");
b = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите стоимость галстука");
c = Convert.ToInt32(Console.ReadLine());
Console.WriteLine("Введите сумму, которую вы даете продавцу");
d = Convert.ToInt32(Console.ReadLine());
int result;
int sdacha;
result = a + b + c;
if (result <= d)
{
sdacha = d - result;
Console.WriteLine("Ваша сдача - {0}", sdacha);
}
if (result > d)
{
Console.WriteLine("Вам нужно доплатить");
}
Console.ReadKey();

Vivdarkbloom, к сожалению, нашел сумму всех чисел от 2 до N, а не число с 
максимальной суммой делителей. Надо было так, пишу на Visual Basic
Sub Command1_Click()
Rem Программа запускается по нажатию кнопки  Command1 на форме
Dim n As Integer, Summa As Integer, Max As Integer
Dim Maxn As Integer, i As Integer, k As Integer
n = Text1.Text ' Это текстовое поле на форме, куда вводится n
Max = 1: Maxn = 1
For i = 2 To n
Summa = 0
For k = 1 To i
If i Mod k = 0 Then Summa = Summa + k ' Если k - делитель i, то прибавляем
Next k
If Summa > Max Then ' Если сумма больше максимальной
   Max = Summa ' Сохраняем сумму
   Maxn = i ' И сохраняем число i.
End If
Next i
Text2.Text = Maxn ' Это второе текстовое поле, куда выводится результат
End Sub