Решите в паскале с объяснением, найти скорость автомобиля, если известен пройденный путь s и время затраченное в пути t ( движение считать прямолинейным и равномерным

Куда уже проще???
uses crt;
var s,t,v:real;
begin clrscr;
write('S= '); 
read(s);
write('T= '); 
read(t);
v:=s/t;
writeln('Cкорость автомобиля= ',v:5:2,'(км/ч)');
end.