membuat program kecepatan dengan TPW.Turbo Pascal

uses wincrt;
var
v,s,t : real;
Begin
write ('masukkan angka jarak'); readln (s);
write ('masukkan angka waktu'); readln (t);
v:=s/t;
writeln ('kecepatan:', v:2:2);
end.