Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 17.04.2016, 19:38   #1
Kate18
 
Регистрация: 17.04.2016
Сообщений: 5
Смущение [РЕШЕНО] Найти сумму нечётных отрицательных элементов массива

Доброго времени суток!решите пожалуйста эту задачу.Даны целые числа b1...,b50.получить сумму тех чисел данной последовательности,которые нечетны и отрицательны.

Решение:
http://www.programmersforum.ru/showp...09&postcount=3

Последний раз редактировалось Вадим Мошев; 15.05.2018 в 20:07.
Kate18 вне форума   Ответить с цитированием
Старый 17.04.2016, 20:18   #2
min@y™
Цифровой кот
Старожил
 
Аватар для min@y™
 
Регистрация: 29.08.2014
Сообщений: 7,664
По умолчанию

писать-то на чём? язык программирования любой?
Расскажу я вам, дружочки, как выращивать грибочки: нужно в поле утром рано сдвинуть два куска урана...
min@y™ вне форума   Ответить с цитированием
Старый 17.04.2016, 20:29   #3
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 26,232
По умолчанию

Цитата:
Сообщение от min@y™ Посмотреть сообщение
писать-то на чём? язык программирования любой?
Паскаль ей нужен.
Слил обе темы в одну, теперь это стало очевидно (см. в каком разделе тема)


-----
Код:
sum:=0;
for i:=1 to 50 do
 if odd(b[i]) and (b[i]<0) then sum:= sum + b[i];
WriteLn(sum);
Serge_Bliznykov вне форума   Ответить с цитированием
Старый 17.04.2016, 21:59   #4
Kate18
 
Регистрация: 17.04.2016
Сообщений: 5
По умолчанию

Спасибо за помощь в решении!
Kate18 вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Найти сумму и количество отрицательных элементов массива lavric666 Паскаль, Turbo Pascal, PascalABC.NET 6 01.11.2012 17:02
Pascal. Найти сумму отрицательных и сумму положительных элементов линейного массива. badname47 Паскаль, Turbo Pascal, PascalABC.NET 1 07.02.2012 06:29
Найти количество отрицательных и нечётных элементов. Wiedzzmin Паскаль, Turbo Pascal, PascalABC.NET 1 31.05.2010 22:03
Найти сумму квадратов отрицательных элементов массива bbk_serg Помощь студентам 7 21.01.2009 13:33


23:04.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.