помогите ,умоляю .решите задачу по информатике через begin

1) случайным образом подбираются два числа в случайном диапазоне. при их равенстве выводится на экран с задержкой соответствующее текстовое сообщение, при их неравенстве - рандомятся ещё два числа и выводятся на экран в одной строке.

//PascalABC.NET//Версия 3.3, сборка 1634 (14.02.2018)begin  var (a,b):=(Random(0,10),Random(0,10));  if a=b     then Println(a,'=',b)    else Println(Random(0,10),Random(0,10));end.