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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 29.09.2016, 19:27   #1
Andrey291
Новичок
Джуниор
 
Регистрация: 29.09.2016
Сообщений: 2
По умолчанию Простая задачка.

В одномерном массиве, с n действительных элементов, вычислить сумму: отрицательное элементов массива и найти максимальный по модулю элемент.
Andrey291 вне форума Ответить с цитированием
Старый 29.09.2016, 20:57   #2
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,546
По умолчанию

Код:
i_max := 0 ; i_sum := 0 ;
for i := 1 to n do
     begin
       if  abs(mas[i]) > i_max  then   i_max := mas[i] ;
       if   mas[i] < 0  then i_sum := i_sum + mas[i]
     end ;

Последний раз редактировалось digitalis; 29.09.2016 в 21:02.
digitalis вне форума Ответить с цитированием
Старый 05.10.2016, 12:50   #3
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,546
По умолчанию

- Ни фига я ему это не сделаю.
- А мне оно и не надо было.
digitalis вне форума Ответить с цитированием
Старый 05.10.2016, 13:40   #4
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Цитата:
Сообщение от digitalis Посмотреть сообщение
- Ни фига я ему это не сделаю.
- А мне оно и не надо было.
надо но неизвестно что именно
http://programmersforum.ru/showthrea...94#post1634694
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
простая задачка simonte Помощь студентам 2 06.12.2013 00:17
Простая задачка stomp Общие вопросы C/C++ 4 02.05.2009 04:00
Простая задачка на access Olya90 Помощь студентам 2 14.04.2009 19:40
Простая задачка Dukalis Общие вопросы C/C++ 1 13.01.2008 18:10