М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
AsterXML
AsterXML
22.02.2021 22:57 •  Информатика

Даны слова. брат слог очко стол рост полк бард обед лоск этап обод скат краб пенс трос темп март морс врач соль крот лава ложа грот гора клич перо. если в каждом слове заменить последнюю букву другой, чтобы получилось новое слово (имя существительное, единственного числа, кроме тех, которые имеют только множественное число), то по вновь вписанным буквам можно прочитать слова что это за слова?

👇
Ответ:
logan8
logan8
22.02.2021
БРАТ-БРАК  СЛОГ-СЛОН  ОЧКО-ОЧКИ СТОЛ-СТОГ РОСТ-РОСА  ПОЛК-ПОЛЕ БАРД-БАРС ОБЕД-ОБЕТ ЛОСК-ЛОСЬ ЭТАП-ЭТАЖ  ОБОД-ОБОИ  СКАТ-СКАЗ  КРАБ-КРАН  ПЕНС-ПЕНЬ ТРОС-ТРОН  ТЕМП-ТЕМА МАРТ-МАРШ МОРС-МОРЕ  ВРАЧ-ВРАГ СОЛЬ-СОЛО  КРОТ-КРОВ  ЛАВА-ЛАВР  ЛОЖА-ЛОЖЕ  ГРОТ-ГРОМ ГОРА-ГОРЕ  КЛИЧ-КЛИН  ПЕРО-ПЕРИ
4,8(63 оценок)
Открыть все ответы
Ответ:
Осоаовлво
Осоаовлво
22.02.2021
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
4,6(63 оценок)
Ответ:
ksubol777
ksubol777
22.02.2021
Пример на 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();
4,8(73 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ