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

Program n1;
var a: real;
begin
write('введите скорость в км/ч: ');
readln(a);
write('эта скорость в м/с: ',a*5/18);
end.