Составить программу, определяющую, является ли данное утверждение истинным . двузначное число а начинается на 3

Program enot;
var a,c: integer;
begin
read(a);
c:=a div 10;
if c=3 then write('зис ис истина') else write('нооу, зис ис лай');
end.