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

Вниз

Синтаксис языка СИ   Найти похожие ветки 

 
Zheksonz   (2011-12-20 16:55) [0]

Имеется ниже следующий код на СИ, который нужно перевести на Делфи. Кто сталкивался ранее с подобным и есть желание помочь, подскажите плз.


char  b;
int i;
DWORD t;
b=1<<m;            
if(s<0) b|=1;      
if(m==4) b=0xa;  
if(s<0) s=-s;      


 
Медвежонок Пятачок ©   (2011-12-20 16:57) [1]

shl
or 1
abs


 
Zheksonz   (2011-12-20 17:03) [2]


> Медвежонок Пятачок


Я правильно понял?

b := 1 shl m;
if (s < 0) then b := b or 1;
if (s < 0) then abs(s);


 
Медвежонок Пятачок ©   (2011-12-20 17:04) [3]

ну как-то так.


 
Zheksonz   (2011-12-20 17:04) [4]

просто под рукой нет ни СИшного компилятора, ни Делфи, нет сейчас возможности поэкспериментировать... а руки чешутся)))


 
Медвежонок Пятачок ©   (2011-12-20 17:05) [5]

if (s < 0) then abs(s);

s := abs(s);


 
Zheksonz   (2011-12-20 17:05) [6]


> Медвежонок Пятачок ©   (20.12.11 17:04) [3]


спасибо большое.


 
Zheksonz   (2011-12-20 17:07) [7]


> s := abs(s);


каюсь, протупил


 
TComponent   (2011-12-20 22:13) [8]

да


 
TComponent   (2011-12-20 22:15) [9]

я просто хотел проверить, можно ли добавить сообщение в закрытое обсуждение... оказалось - что можно. А в чем тогда смысл красного текста "Обсуждение закрыто"?


 
Rouse_ ©   (2011-12-20 22:24) [10]

Оно не закрытое - его просто перенесли в другой подфорум, в старом оно осталось с красным значком.



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

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

Наверх




Память: 0.48 MB
Время: 0.006 c
15-1323981002
Юрий
2011-12-16 00:30
2012.04.22
С днем рождения ! 16 декабря 2011 пятница


15-1324067402
Юрий
2011-12-17 00:30
2012.04.22
С днем рождения ! 17 декабря 2011 суббота


2-1325099067
ghjtyu21
2011-12-28 23:04
2012.04.22
змейка


3-1274429485
RWolf
2010-05-21 12:11
2012.04.22
План запроса vs. время выполнения


15-1324457180
Mysql_error
2011-12-21 12:46
2012.04.22
Настроить коннет к mysql с разных компьютеров