Главная страница
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.063 c
2-1271150334
Гость
2010-04-13 13:18
2010.08.27
Try Finally Try Except а оно надо?


15-1274332956
Медвежонок Пятачок
2010-05-20 09:22
2010.08.27
Пример как не надо программаровать


2-1269931142
oleg1963lora
2010-03-30 10:39
2010.08.27
TStringList.Clear. Странное поведение метода


2-1270827005
User
2010-04-09 19:30
2010.08.27
Можно ли записывать в папку


15-1268326974
Правильный$Вася
2010-03-11 20:02
2010.08.27
D2010 обрела уже стабильность?