Решите в паскаль!

Ракета запускается с точки на экваторе и развивает

скорость v км/с. Каков результат запуска? Замечание: если v<=7.8 км/с, то ракета

упадет на Землю, если 7.816.4,

то ракета покинет Солнечную Систему

Var v:real;

begin

write ('вв. скорость');

read (v);

if v<=7.8 then write (' ракета упадет на Землю');

if (v>7.8) and (v<11.2) then write (' ракета спутник Земли');

if (v>=11.2) and (v<=16.4) then write ('ракета спутник Солнца');

if v>16.4 then write ('ракета покинет Солнечную систему');

end.