Написать программу в паскале, которая определяет сумму натуральных чисел кратных 3 и оканчивающихся на 6. последнее число последовательности 0. количество чисел не превышает 1000. количество введённых чисел неизвестно.

185

214

Посмотреть ответы 3

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

uliana3447

Информатика

4,5(43 оценок)

Поскольку тут речь о последовательности неизвестной длины, вводимой с клавиатуры до появления нуля, а условие позволяет для каждого вводимого числа сразу решить, должно ли оно входить в сумму, решается без использования массива и условие " количество чисел не превышает 1000" - это просто ловушка для наивных с тем, чтобы в случае использования массива длиной 1000 объявить затем решение неэффективным по памяти. 1. решение на современной версии паскаля pascalabc.net 3.2, сборка 1389 от 01.03.2017 внимание! если программа не работает, обновите версию! begin var s: =readseqintegerwhile(n-> n< > 0) .where(n-> (n mod 3=0) and (n mod 10=; writeln('сумма отобранных чисел равна ',s) end. пример 15 36 26 72 25 96 83 0 сумма отобранных чисел равна 132 2. решение "по-школьному" var n,s: integer; begin s: =0; repeat read(n); if (n mod 3=0) and (n mod 10=6) then s: =s+n until n=0; writeln('сумма отобранных чисел равна ',s) end. пример 15 36 26 72 25 96 83 0 сумма отобранных чисел равна 132

лаьтслчлвт

Информатика

4,6(7 оценок)

Uses crt; var n, i, s: integer; a: array [1..1000] of integer; begin writeln('введите количество чисел последовательности'); read(n); s : = 0; writeln('введите числа'); for i : = 1 to n do begin read(a[i]); a[n] : = 0; end; writeln(); for i : = 1 to n do write(a[i], ' '); writeln(); for i : = 1 to n do s : = s + a[i]; writeln('сумма=', s); end.

Predator123765

Информатика

4,4(72 оценок)

число 113: для него прямой, обратный и дополнительный коды , так как оно положительное.

113(10)=01110001(2)

число (-36):

прямой код: 36(10)=00100100(2)

обратный код (код, в котором меняем 0 на 1, а 1 на 0 в прямом коде):

-36(10) - обратный код 11011011(2)

дополнительный код (к младшему разряду обратного кода прибавляем 1):

-36(10) - дополнительный код 11011100(2) - это число -36 в доп.коде

сложим 113+(-36) в двоичных кодах:

01110001(2)+11011100(2)=1 0100 1101(2). старшую единицу отбрасываем, получаем:

01001101(2)=77(10)

проверим: 113-36=77 в десятичной с/с

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

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

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.