Даны два числа а и в если первое больше второго найти его утроенную разность

Var a,b: integer;
Begin
Read (a);
Read (b);
If a>b Then writeln ('ответ: ',3*(a-b)) else writeln ('Число a меньше или равно числу b');
End.