Какой результат выдаст компьютер, в результате выполнения следующих фрагментов программ

1) a:= -5;

b := 3;

a := a - b*2;

if a > b then c := b – a else c := a - b;

writeln(c);

2) a:= 7;

b :=9;

if (a > b)and (b<7) then k := 1 else k := 0;

writeln(k);

3) a:= 7;

b :=9;

if (a > b) or (b<7) then k := 1 else k := 0;

writeln(k);