Получить случайное трехзначное число и вывести через пробел его отдельные цифры.

//Pascal ABC.Net 3.0var a:integer;s:string;beginrandomize;a:=random(100,999);str(a,s);writeln(s[1],' ',s[2],' ',s[3]);end.