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

Вниз

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

 
NickEr   (2007-09-21 03:44) [0]

Имеется выходное значение, например: res равное какому-то числу в двоичной системе счисления. Как определить симметричную ли последовательность цифр составляет данное число?


 
MBo ©   (2007-09-21 05:32) [1]

проверять в цикле биты слева и справа


 
Slym ©   (2007-09-21 06:24) [2]

NickEr   (21.09.07 3:44)
симметричность - относится к строковому (символьному) представлению числа...
11100111 - симетрично, тоже число в деситичной системе - 231 нет, как и E7 (16"ричной)


 
Slym ©   (2007-09-21 06:34) [3]

uses StrUtils;

function IsSymetricString(const Str:string):boolean;
var
 Str1,Str2:string;
 c:integer;
begin
 result:=false;
 if (length(Str) mod 2)<>0 then
   exit;
 c:=length(Str) div 2;
 Str1:=copy(Str,1,c);
 Str2:=copy(Str,c+1,c);
 Str2:=ReverseString(Str2);
 result:=(Str1=Str2);
end;

Usage:
if not IsSymetricString("11100111") then raise Exception.Create("Sorry...");



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

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

Наверх




Память: 0.47 MB
Время: 0.033 c
2-1190029241
Виктор007
2007-09-17 15:40
2007.10.14
ширина PopupMenu


15-1189636957
Бакук
2007-09-13 02:42
2007.10.14
Англия-Россия-3:0


2-1189666338
muhsin2281
2007-09-13 10:52
2007.10.14
rtl70.bpl vcl70.bpl не найден


2-1189754420
Ega23
2007-09-14 11:20
2007.10.14
Может ли конструктор быть виртуальным?


15-1189550634
iZEN
2007-09-12 02:43
2007.10.14
Россия испытала самую мощную в мире вакуумную бомбу