[malekskv]

Сообщение от Drozh

Код:

s := 2;
s := s shl 1;
Label1.Caption := IntToStr(s);

Тюфу, так просто... Спасибо))

Еще вопрос.. как подобным образом можно умножать\делить на 3,5,6 и так далее.. и возможно ли так?