Задано пятизначное число.Найдите цифры и сумму цифр пятизначного числа. (Программа на Паскале) div и mod

// - комментарии, можешь не писать, это пояснение для тебя var z,a,b,c,d,e,f: integer; begin Write('Введите пятизначное число'); read(z); a:=a div 10000;                      // число десятков тысяч b:=a mod 10000 div 1000;     // число тысяч  c:=a mod 1000 div 100;         // число сотен d:=a mod 100 div 10;             // число десятков  e:=a mod 10;                         // число единиц f:=a+b+c+d+e;                      // сумма цифр Writeln('Цифры: ', a,b,c,d,e); Write('Сумма цифр: ',f); end.