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

Хорошая в настоящее время известно множество разных чисел: простые, составные, числа фибоначчи и многие другие. школьник василий решил придумать свои числа, чтобы остаться на страницах . как говорится, своё всегда является лучшим, поэтому василий, недолго думая, назвал свои числа хорошими. под его определение хорошего числа подходят все числа, большие девяти, для которых выполняются следующие условия: 1. если пронумеровать позиции цифр в числе справа налево, начиная с 1 (то есть в числа 42 двойка будет на первой позиции, а четвёрка на второй), то суммы цифр на чётных и нечётных позициях будут отличны от нуля. 2. сумма цифр, стоящих на чётных позициях, делится на сумму цифр, стоящих на нечётных позициях. теперь василий хочет проверить, является ли некоторое число n хорошим. входные данные первая строка входного файла содержит одно целое число n (1 ≤ n ≤ 10100) – число, интересующее василия. гарантируется, что для всех чисел, поступающих на вход, выполнено условие 1. выходные данные если введённое число хорошее, то выведите "yes" без кавычек и (через одиночный пробел) частное от деления суммы цифр, стоящих на чётных позициях, на сумму цифр, стоящих на нечётных позициях, в противном случае выведите "no" (также без кавычек) и остаток от деления. подскажите, хотябы сам ход решения, без всякий begin, program и т.д

👇
Ответ:
ваня1259
ваня1259
24.12.2020
Самый простой вариант - подсчитать сумму четных и нечётных через цикл, в котором берём остатки от деления. Можно начать с конца и соответственно начать подсчитывать сумму только от первого числа с конца не равного 0. Подсчитываем через целочисленное деление на круглое число и нахождение остатка при деление на один. Данные, чередуя, прибавляем к разным переменным(пусть будут x1 и x2). Затем проверяем остаток от деления одной переменной на другую. Если 0 - "Yes", иначе - "No" For i=5 downto 1 do If i Mod 2 = 1 then a:= a+n div (10^(i-1)) mod 10 Else B=B+ div (10^(i-1)) mod 10;
4,8(31 оценок)
Открыть все ответы
Ответ:
Зеф3
Зеф3
24.12.2020

---PascalABC.NET 3.6.2 ---

begin

 //Создадим переменную A типа List<integer>, задав в конструкторе ёмкость в 20 элементов;

 var A : List<integer> := New List<integer>(20);  

 A.AddRange(SeqGen(A.Capacity, p -> Random(-10, 10))); //Запишем в наш List последовательность, длина которой равна List<T>.Capacity, и каждый элемент в которой генерируется случайно в диапазоне [-10; 10]

 A.Println; //Распечатаем в консоль содержимое A

end.

Объяснение:

Заместо стандартного паскалевского массива использован класс List<T> библиотеки .NET Framework, являющийся аналогом обычного массива, но имеющий большее число методов для работы с ним.

А вообще, программа может быть написана в 1 строку:

begin

 ArrRandom(20, -10, 10).Println;

end.

4,4(98 оценок)
Ответ:
нэлли1987
нэлли1987
24.12.2020

Басқа тілде оқу

Download PDF

Бақылау

Өңдеу

Ақпараттық қауіпсіздік — мемлекеттік ақпараттық ресурстардың, сондай-ақ ақпарат саласында жеке адамның құқықтары мен қоғам мүдделері қорғалуының жай-күйі.

Ақпаратты қорғауӨңдеу

Ақпаратты қорғау — ақпараттық қауіпсіздікті қамтамасыз етуге бағытталған шаралар кешені. Тәжірибе жүзінде ақпаратты қорғау деп деректерді енгізу, сақтау, өңдеу және тасымалдау үшін қолданылатын ақпарат пен қорлардың тұтастығын, қол жеткізулік оңтайлығын және керек болса, жасырындылығын қолдауды түсінеді. Сонымен, ақпаратты қорғау - ақпараттың сыртқа кетуінің, оны ұрлаудың, жоғалтудың, рұқсатсыз жоюдың, өзгертудің, маңызына тимей түрлендірудің, рұқсатсыз көшірмесін жасаудың, бұғаттаудың алдын алу үшін жүргізілетін шаралар кешені

4,7(41 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ