Книга программиста/Фильтрация изображений на PascalABC.Net: различия между версиями

Содержимое удалено Содержимое добавлено
Строка 653:
! Формулы
|-
| r = Round(c.R + 128 * NR / 100 * 128)
|-
| g = Round(c.G + 128 * NG / 100 * 128)
|-
| b = Round(c.B + 128 * NB / 100 * 128)
|}
{{Hider|
Строка 695:
begin
var c := Pic1.GetPixel(i, j);
var r := Round(c.R + 128 * NR / 100 * 128);
var g := Round(c.G + 128 * NG / 100 * 128);
var b := Round(c.B + 128 * NB / 100 * 128);
TruncColor(r);