Здравствуйте, кто разбирается в информатике С клавиатуры вводится натуральное число, не превышающее $10^{9}$ .
Вычислите и выведите на экран среднее арифметическое всех чётных цифр этого числа.
Если чётных цифр нет, выведите Сообщение «Чётных цифр нет!».
Пример: для числа 120459363 среднее арифметическое чётных цифр равно 3.

2-3. С клавиатуры вводится последовательность целых чисел.
Окончанием последовательности является ввод числа ноль (сам ноль в обработке не участвует).
Определите наибольшее расстояние между значениями двух соседних членов этой последовательности.
Пример: в последовательности «3 -5 -8 -9 2 4 -3 7 9 0» наибольшее расстояние между значениями двух соседних членов равно 11.
( В Паскале )

188

339

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

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

4fhfhiukhriu

Информатика

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

Dim j(1 to 20) as integer i%=0 randomize timer p%=0 cls 'очистить экран for i%=1 to 20 j(i%)=int(180*rnd)-90 'случайное целое на [-90,90] print j(i%) if j(i%)> 0 then p%=p%+1 next print "количество положительных элементов",p% end

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

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

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

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

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

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

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

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

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

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