Напишите функцию, которая моделирует бросание двух игральных кубиков (на каждом может выпасть от 1 до 6 очков). (Используйте генератор псевдослучайных чисел)

// PascalABC.NET 3.1, сборка 1179 от 29.02.2016function Dice2():=Rec(Random(1,6),Random(1,6));// тестовый пример - 10 бросковbegin  for var i:=1 to 10 do Writeln(Dice2)end.Тестовое решение:(6,6)(1,6)(5,6)(1,1)(1,5)(6,5)(1,4)(5,6)(1,3)(2,6)