ПОМОГИТЕ ПОЖАЛУЙСТА!!!
Напишите программу, которая вводит  трёхзначное число и разбивает его на цифры. Например, при вводе числа 123 программа должна вывести"1,2,3"

var a:integer;beginwriteln('vvedite chislo');readln(a);write(a div 100,', ', a div 10 mod 10,', ', a mod 10)end.