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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 11.10.2015, 20:41   #1
Гарри
Пользователь
 
Регистрация: 11.06.2015
Сообщений: 30
По умолчанию В последовательности чисел ,сравнить , что больше.

В последовательности чисел ,введенных с клавиатуры в поле Memo, сравнить , что больше :сумма положительных или произведение отрицательных чисел .
Гарри вне форума Ответить с цитированием
Старый 13.10.2015, 19:25   #2
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

пробежаться циклом и считать в 2 переменные....

типо
бежим с 0 до конца мемо
если спрока[i]>0 тогда сумма:=сумма+спрока[i]
если строка<0 то произведение:=произведение*спрока[i]

в дельфи переведете сами?
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)
BARNEY вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
задача pascal. Ввести N чисел и число K. Проверить, что сумма остатков от деления нечетных Х на К, больше суммы остатков деления.. N.i.k.o.l.a.y. Помощь студентам 4 17.11.2014 14:59
Выяснить, верно ли, что сумма тех вещественных чисел , которые больше 20,5, мен Anonim123 Паскаль, Turbo Pascal, PascalABC.NET 6 21.05.2014 17:07
Определить каких чисел в целочисленной последовательности больше:четных или кратных 3 naty7773 Помощь студентам 4 18.12.2012 12:01
Заданы массивы А(15).В(17),С(10),состоящие из положительных и отрицательных чисел. Определить в каком массиве,больше четных чисел. Richik123 Паскаль, Turbo Pascal, PascalABC.NET 1 19.06.2012 12:24
Определить k-ую цифру последовательности Фибоначчи и последовательности натуральных чисел. Med Помощь студентам 1 20.03.2009 11:40