Если покупка равна 500 и больше,то предоставляется скидка в 10%,если сумма покупки 1000 и больше,то скидка=20% как будет выглядеть в паскале?

Var
x,y : integer;
begin
readln(x);
y:= x;
if x >= 500 then y := (x * 90) / 100;
else if x >= 1000 then y:= (x*80) / 100;
else print('Скидки нет');
print(y);
end.