Составить программу известна заработная плата сотрудников вычислить величину подоходного налога в turbo pascal

Var a:integer; b:real;
beginwrite('Введите заработную плату : ');
readln(a);
b:=a/100*13;
writeln('Величина подоходного налога = ',b);
end.