Определите значение целочисленной переменной a после выполнения фрагмента программы:
a := 1819;
b := \(a div 100\)*10+9;
a := \(10\*b–a\) mod 100;