Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

сравнение числа с маской   Найти похожие ветки 

 
tippa ©   (2010-04-18 20:04) [0]

Не могу написать функцию, которая берет маску в виде строки (например "XXYZZZ") и число, и возвращает true, если число подходит к этой маске.
function proverim(mask:string;n:integer):boolean;
//proverim("ZXXVVV",166000)->true

Дайте пожалуйста совет.


 
И. Павел ©   (2010-04-18 20:11) [1]

Как вариант:
Сперва сравниваем длины числпа и маски. Потом берем первую цифру числа - проходим по всем остальным цифрам - если маска та же а цифра другая - возвращаем ложь. Потом переходим к второй цифре и т.д.


 
DVM ©   (2010-04-18 20:28) [2]


> tippa ©

Может регулярные выражения использовать?


 
tippa ©   (2010-04-18 22:09) [3]

спс, вроде работает)
function maska(mask:string;n:string):boolean;
var i,j:integer;
   len:integer;//длина маски и числа
begin
Result:=true;
if length(mask)<>length(n) then
                                begin
                                Result:=false;
                                exit
                                end;
len:=length(mask);
for i:=1 to len do
 begin
 for j:=1 to len do
   begin
   if (mask[i]=mask[j]) and (n[i]<>n[j]) then
                                         begin
                                         Result:=false;
                                         exit
                                         end;
   end;
 end;
end;



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

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.047 c
15-1275844691
Dima84
2010-06-06 21:18
2010.08.27
Ошибка form of method call


10-1166561371
TStas
2006-12-19 23:49
2010.08.27
Как получить число страниц в вордовском файле?


15-1270305381
Игорь Шевченко
2010-04-03 18:36
2010.08.27
Microsoft заботится о нас. Иногда даже чересчур


15-1266186779
OneYoungMan
2010-02-15 01:32
2010.08.27
Очистка cd и dvd дисков...


2-1266408421
Den
2010-02-17 15:07
2010.08.27
Через какие порты работает FIBPlus?