Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.81/21: Рейтинг темы: голосов - 21, средняя оценка - 4.81
1 / 1 / 0
Регистрация: 05.04.2015
Сообщений: 32

Найти сумму нечетных чисел последовательности

05.04.2015, 20:22. Показов 4069. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дана последовательность целых чисел, оканчивающаяся нулём. Необходимо найти сумму всех нечетных чисел этой последовательности. Ноль числом последовательности не считается.

Вводится не более, чем 2^15 целых чисел, каждое из которых не превосходит по модулю (2^15−1). После последнего числа вводится 0.
С циклом while
Если нужно используйте integer; if; for; другие не используете
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
05.04.2015, 20:22
Ответы с готовыми решениями:

Найти сумму всех идущих подряд в начале последовательности нечетных чисел
Дана последовательность из п вещественных чисел. Первое число в последовательности не-четное. Найти сумму всех идущих подряд в начале...

В данной последовательности целых чисел найти количество различных нечетных положительных чисел
В данной последовательности целых чисел найти количество различных нечетных положительных чисел.

Найти сумму положительных нечётных <100 в последовательности
Дана последовательность чисел заканчивающихся на 0 найти сумму положительных нечётных &lt;100

2
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
05.04.2015, 20:35
Лучший ответ Сообщение было отмечено MrXayc как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var a,s:integer;
begin
writeln('Введите целые числа, окончание ввода 0');
s:=0;
a:=1;
while a<>0 do
 begin
  readln(a);
  if odd(a) then s:=s+a;
 end;
write('s=',s)
end.
0
07.04.2015, 16:52

Не по теме:

MrXayc, эта тема - почти что дубль вот этой Вашей темы: Сумма нечетных чисел последовательности. Будьте внимательнее при создании темы. И ещё, на будущее. Уточняйте, пожалуйста, задание в уже созданной теме, а не создавайте на каждую Вашу ошибку новую тему.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
07.04.2015, 16:52
Помогаю со студенческими работами здесь

Найти наибольшую сумму тpех нечётных элементов последовательности
Найти наибольшую сумму тpёх нечётных элементов последовательности.

Найти сумму целых положительных чисел нечетных чисел меньших 100
Найти сумму целых положительных чисел нечетных чисел меньших 100!

Вводится 10 чисел. Найти сумму всех четных чисел и произведение нечетных
вводится 10 чисел.найти сумму всех четных чисел и произведение нечетных

Найти сумму нечётных чисел и количество чётных чисел в двух массивах
Пусть дано 2 массива. Составить программу для нахождения суммы нечетных чисел и количества четных чисел в обоих массивах. Заполнение, вывод...

Создать массив целых чисел и найти сумму нечётных чисел
Написать программу,которая создаёт массив N целых чисел и с помощью процедуры,находит сумму нечётных чисел.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Киев стоит - украинская песня
zorxor 28.01.2026
wfWdiRqdTxc О Господи, Вечный, Ты . . . Я помоги, Бесконечный. . . Я прошу Ты. . . Я погибаю, спаси. . . Я прошу Тебя Вечный. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru