Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.10.21;
Скачать: [xml.tar.bz2];

Вниз

Срочно   Найти похожие ветки 

 
Ильдар ©   (2007-09-24 19:23) [0]

Люди нужна помощь срочно до завтра. Вопрос такой есть 2 переменные типа Strung первая "100" вторая "M" надо каким то образом их перемножить чтобы результат был 100M


 
Anatoly Podgoretsky ©   (2007-09-24 19:33) [1]

> Ильдар  (24.09.2007 19:23:00)  [0]

Числа на буквы умножать нельзя.


 
Ильдар ©   (2007-09-24 19:42) [2]

Я понимаю но может как то можно обойти дело в том что делаю программу решения симплекс метода и при вычислении M+1 строки нужно M переумножать с числом


 
Kolan ©   (2007-09-24 20:05) [3]

> "100" вторая "M"


> чтобы результат был 100M

S := "100" + "M";


 
Ильдар ©   (2007-09-24 20:25) [4]

Дело в том что это всё идет по циклу и вместо М может попасться число и их надо будет перемножить


 
Kolan ©   (2007-09-24 20:30) [5]

> [4] Ильдар ©   (24.09.07 20:25)
> Дело в том что это всё идет по циклу и вместо М может попасться
> число и их надо будет перемножить

var
 I, Val: Integer;
begin  
 for I := 0 to 10 do
   if TryStrToInt(Val) then
     100*Val;
&#133


ЗЫ
 Очередной идиотизм&#133


 
Однокамушкин   (2007-09-24 20:31) [6]

Сначала с помощью TryStrToInt (или TryStrToFloat, если числа могут быть нецелыми) проверяете, являютлся ли строки числами, и если да, перемножаете числа и получаете из результата строку с помощью IntToStr, если же хотя бы одно из них не число, то просто складываете строки


 
ggg   (2007-09-24 20:33) [7]

>> [1]
А что за тип такой "Strung"? о_О


 
Юрий Зотов ©   (2007-09-25 01:37) [8]

> нужна помощь срочно до завтра

Увы, это невозможно.


 
Германн ©   (2007-09-25 01:41) [9]


> Kolan ©   (24.09.07 20:30) [5]

И кто ж тебя учил такому:

> var
>  Val: Integer;
>



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.10.21;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.034 c
15-1190286598
ANTPro
2007-09-20 15:09
2007.10.21
Подкажите программу


2-1190494437
Neux
2007-09-23 00:53
2007.10.21
Удаление одинаковых строк


15-1190275092
Layner
2007-09-20 11:58
2007.10.21
Сколько Vista проработает без активации?


8-1168195108
Dio
2007-01-07 21:38
2007.10.21
Тень от объектов


15-1190311658
Beastie Boys
2007-09-20 22:07
2007.10.21
Не могу подключиться к АДСЛ





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский