Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.05.2009, 19:16   #1
Artom
Пользователь
 
Регистрация: 11.05.2009
Сообщений: 10
По умолчанию помогите пожалуйсто!!!!!!!

В одномерном массиве, состоящем из N вещественных элементов, вычислить сумму отрицательных элементов массива.
Artom вне форума Ответить с цитированием
Старый 21.05.2009, 19:27   #2
Sazary
В тени
Старожил
 
Аватар для Sazary
 
Регистрация: 19.12.2008
Сообщений: 5,788
По умолчанию

Код:
sum := 0;
for i:=1 to N do 
 if mas[i]<0 then sum := sum + mas[i];
И в чем проблема?
Вполне очевидно, чтобы что-то понять, необходимо книги читать.
Не нужно плодить бессмысленных тем. Вас Поиск избавит от многих проблем.

___________________________________ ___________________________________ _______
[=Правила форума=]_____[Поиск]_____[Литература по С++]____[Литература. Паскаль]
Sazary вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите пожалуйсто... Antyan-screammer Помощь студентам 5 30.01.2009 17:43
Пожалуйсто помогите в Delphi Saaashka Помощь студентам 1 26.11.2008 12:39