Пожалуйста, помогите решить задачу по информатике! Программирование на языке Pascal ABC. Заранее спасибо!

Вероятность заданного числа на кубике 1/6, следовательно комбинации 1/6 * 1/6 = 1/36. Но т.к. порядок не важен, то вероятность 1/18 если числа не совпадают.

var
  a, b : integer;
begin
  read (a, b);
  if a = b then write (36) else write (18);
end.