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

Program pyati;
var a:integer;
begin 
Writeln('Введите число'); 
Readln(a); 
a:=a div 100; 
a:=a mod 100; 
a:=a mod 10; 
Writeln(a)
end.