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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 25.08.2017, 04:35   #1
Supiner
Новичок
Джуниор
 
Регистрация: 25.08.2017
Сообщений: 1
По умолчанию Работа с memo. Сложение/Деление Десятичных и обычных цифр - Delphi

Здраствуйте, требуется помощь умельцам в delphi/pascal
Пожалуйста, сам новичек и очень глупый, готов учиться на примерах, знаю, что всем без разницы, но все же, вдруг найдутся такие люди, которые помогут...
имею 14 строчек цифр из memo
• 120
• 165
• 220
• 300
• 410
• 565
• 775
• 1060
• 1455
• 1990
• 2730
• 3740
• 5125
• 7030
в суммe они дают 25 685

Нужно:
Делить их все на числа(например 7 или 5,5 юзер сам их пишет в edit) ,
либо умножать(отдельной кнопкой) и заносить все это в memo вместо предыдущих числ.
после их все складывать, чтобы получилась новая сумма и занести ее ниже в memo (Сумма: n)

Жду ответов, заранее спасибо!
эх, была не была

Картинка для наглядности
https://pp.userapi.com/c638223/v6382...tHV1q-PF74.jpg
Supiner вне форума Ответить с цитированием
Старый 25.08.2017, 09:14   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Сообщение от Supiner Посмотреть сообщение
Картинка для наглядности
картинка недоступна по ссылке.
да и лучше загрузить картинку на форум (см. "Загрузить файлы" - "Управление вложениями")


Цитата:
Сообщение от Supiner Посмотреть сообщение
имею 14 строчек цифр из memo
скорее чисел.
раз уже сумма 25685

перебрать все строки в мемо:
Код:
for i:=0 to Memo1.Lines.Count-1 do
  // обращение к i-й строке: Memo1.Lines[i]
преобразовать строковое значение в числовое:
StrToInt() для целых чисел или StrToFloat() - для вещественных

если в строке мемо в начале присутствую посторонние знаки (типа • , пробелов, табуляции) - то от них нужно избавиться. можно прямо в Мемо, чтобы их там не было. Если же они там нужны,
тогда избавляться от них при работе со строковой переменной.

ещё вопросы?
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
формула для определения количества десятичных цифр в числе carman Помощь студентам 4 19.07.2012 15:36
Строки в Delphi: строка символов, состоящая из десятичных цифр, разделенных пробелами. Вывести числа в возрастающем порядке Dashylia Помощь студентам 2 18.03.2012 14:03
деление упакованных двоично-десятичных чисел DIGOREC Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 0 21.06.2011 18:54
Код 2 из 5. Один из способов сопоставления десятичных цифр tiker Общие вопросы Delphi 1 14.04.2011 14:15
Сложение двух цифр Delphi MrMorozko Помощь студентам 5 27.10.2010 18:52