Напишите программку которая определяет находится ли введеный год в прошедшем истинном

Const    current_year = 2017;


var    year: integer;


begin

    readLn(year);

    if year lt; 2017 then 

        Write(year, ' прошедшее')

    else if year = 2017 then 

        Write(year, ' истиннее')

    else if year gt; 2017 then 

        Write(year, ' будущее')

end.

Проблем быть не должно, мыслю, это самое примитивное.
Program asd;
Var x: integer;
Begin
read(x);
if xlt;2017 then Write(' ',x,' год теснее прошел.') else
if x=2017 then Write(' ',' На данный момент ',x,'.') else
if xgt;2017 then Write(' ',x,' Еще не настал.')
end.

Полагаюсь, посодействовал.
Буду признателен, если выберешь "Наихороший"
Фортуны!