Вниз
Скачать: CL | DM;

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

← →
Ильдар ©   (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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.017 c
15-1190384033
wl
2007-09-21 18:13
2007.10.21
программа чтобы отрезать от mp3 рингтон


11-1174410437
Dmitriy___
2007-03-20 20:07
2007.10.21
ListView - проблема с LVItems


15-1187779146
Сергей М.
2007-08-22 14:39
2007.10.21
Помощь экстрасенса


3-1182149600
ambhtr
2007-06-18 10:53
2007.10.21
Как скопировать информацию из таблицы на сайте?


4-1176883424
evgenij_
2007-04-18 12:03
2007.10.21
Stay on Top




   Наверх