Значение переменных aиb после выполнения фрагмента программы a: =1; b: =10; a: =a+b; b: =a-b; a: =a-b.кто решит тому 50 !

Program _1;
var   a, b, a1, b1: integer;
begin
a:=1;
b:=10;
a1:=a+b
;b1:=a-b;
write('Значение =', a1-b1 );
end.