Регистрация
Никита0Скорая0Помощь
21.10.2020 17:28
Информатика
Есть ответ 👍

Дано четырехзначное число. если сумма его цифр является четным значением определить, равна ли сумма первых двух цифр сумме последних двух цифр. например число 1441 сумма цифр 10 – четное значение. 1+4 = 4+1. ответ да 1320 сумма цифр 6 – четное значение. 1+3 не равно 2 + 0. ответ нет на языке программирования (vba) (visual basic)

278
364
Посмотреть ответы 2

Ответы на вопрос:

Kasha09
Kasha09
4,4(59 оценок)
Сделал на с++, может кто-нибудь переведет или вы поймёте логику программы. в целом вводим число и с простого деления и остатка от деления, выражаем отдельные числа. находим сумму и проверяем условия. #include < iostream> using namespace std; int main(void) {   setlocale(lc_all, "russian");     int num, a1, a2, a3, a4, sum;     cout < < "введите четырехзначное  число: " ;     cin > > num;     a1 = num / 1000;   //делим введенное число на цело,   a2 = (num / 100)%10;   // а потом используем остаток от деления   a3= (num / 10) % 10;   a4 = num % 10;   sum = a1 + a2 + a3 + a4;       if (sum%2==0)       {               cout < < "сумма четная" < < endl ;               if (a1 + a2 == a3 + a4)                         cout < < "да, условие выполняется" < < endl;               else                         cout < < "нет, условие не выполняется" < < endl;       }   else           cout < < "сумма нечётная." < < endl;     system("pause");     return 0; }
Vasilek2006
Vasilek2006
4,7(25 оценок)

Дважды подряд записать трехзначное число — это значит умножить его на  1001. Умножив на 1000, мы получаем исходное число с тремя нулями. Добавляем к полученному числу еще один раз исходное число. Получается число, в записи которого дважды повторяются цифры исходного числа.  

Последовательно разделить на 13, 11 и 7 –  значит разделить число на произведение 13 * 11* 7,  которое равно 1001.

Получается, что мы число сначала умножаем на 1001, а после делим на 1001. Естетственно, у нас получится исходное число:

(n * 1001) / (13 * 11 * 7) = (n * 1001) / 1001 = n.

Популярно: Информатика