And/ru: what changed
Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.
| Old | New | Line | |
|---|---|---|---|
| 1 | + | ## Contents | |
| 2 | + | ||
| 3 | + | * 1 Логическая операция | |
| 4 | + | * 1.1 Таблица истинности | |
| 5 | + | * 2 Побитовая операция | |
| 6 | + | * 2.1 Является ли операнд степенью двойки | |
| 7 | + | * 3 См. также | |
| 8 | + | ||
| 1 | 9 | ## Логическая операция | |
| 2 | 10 | ||
| 3 | - | ||
| 11 | + | Логическая операция **And** выдает значение [[True/ru|true]] тогда и только тогда, когда оба логических операнда равны true. | |
| 4 | 12 | ||
| 5 | 13 | ### Таблица истинности | |
| 6 | 14 | ||
| 7 | - | ||
| 8 | - | ||
| 9 | - | ||
| 10 | - | ||
| 11 | - | ||
| 12 | - | ||
| 13 | - | ||
| 15 | + | A | B | A and B | |
| 16 | + | ---|---|--- | |
| 17 | + | false | false | false | |
| 18 | + | false | true | false | |
| 19 | + | true | false | false | |
| 20 | + | true | true | true | |
| 21 | + | ||
| 14 | 22 | ## Побитовая операция | |
| 15 | 23 | ||
| 16 | - | ||
| 24 | + | Для логической операции **And** (также известна, как Побитовое И) требуются операнды порядкового типа и в результирующей переменной бит устанавливается в 1 тогда и только тогда, когда оба соответствующих бита равны 1. | |
| 17 | 25 | ||
| 18 | 26 | ### Является ли операнд степенью двойки | |
| 19 | - | ||
| 20 | - | ||
| 27 | + | ``` | |
| 21 | 28 | function IsPowerOfTwo( const aValue : longint ): boolean; | |
| 22 | - | ||
| 23 | - | ||
| 24 | - | ||
| 25 | - | ||
| 26 | - | ||
| 27 | - | ||
| 29 | + | var | |
| 30 | + | x : longint; | |
| 31 | + | b : boolean; | |
| 28 | 32 | begin | |
| 29 | - | ||
| 30 | - | ||
| 31 | - | ||
| 33 | + | b := false; | |
| 34 | + | if aValue <> 0 then | |
| 35 | + | begin | |
| 36 | + | x := aValue - 1; | |
| 37 | + | x := x and aValue; | |
| 38 | + | if x = 0 then b := true; | |
| 39 | + | end; | |
| 40 | + | result := b; | |
| 32 | 41 | end; | |
| 33 | - | ||
| 34 | - | ||
| 35 | 42 | ``` | |
| 36 | 43 | ||
| 37 | - | ||
| 44 | + | Если вы вызовете IsPowerOfTwo(4), то получите результат **true**. Если вызовете IsPowerOfTwo(5), то результатом будет **false**. | |
| 38 | 45 | ||
| 39 | 46 | ## См. также | |
| 40 | 47 | ||
| 41 | - | ||
| 42 | - | ||
| 43 | - | ||
| 48 | + | * [[Not/ru|Not]] | |
| 49 | + | * [[Or/ru|Or]] | |
| 50 | + | * [[Shl/ru|Shl]] | |
| 44 | 51 | ||
| 45 | - | ||
| 46 | - | ||
| 47 | - | ||
| 52 | + | * [Const](</index.php?title=Const/ru&action=edit&redlink=1> "Const/ru \(page does not exist\)") | |
| 53 | + | * [[Function/ru|Function]] | |
| 54 | + | * [[Integer/ru|Integer]] | |
| 48 | 55 | ||
| 49 | - | ||
| 50 | - | ||
| 56 | + | * [[Shl|Clear a bit]] | |
| 57 | + | * [Bit manipulation](</index.php?title=Bit_manipulation/ru&action=edit&redlink=1> "Bit manipulation/ru \(page does not exist\)") | |
| 51 | 58 | ||
| 52 | 59 | --- | |
| 53 | - | ||
| 60 | + | *From the Free Pascal wiki, page "And/ru", as the Internet Archive kept it on 2024-09-10. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).* |
