Написать программу которая запрашивает возраст мужчины и сообщает сколько лет ему осталось до пенсии

Program hren;
uses crt;
var a:integer;
BEGIN
writeln ('How old are you?');
read(a);
a:=60-a;
writeln ('years you have ',a);
END.