program CalculateVelocity;
vardisplacement, time, velocity: real;
beginwriteln('Enter the displacement (in meters): ');readln(displacement);
writeln('Enter the time taken (in seconds): ');readln(time);
velocity := displacement / time;
writeln('The velocity of the object is: ', velocity:0:2, ' m/s');
end.
program CalculateVelocity;
var
displacement, time, velocity: real;
begin
writeln('Enter the displacement (in meters): ');
readln(displacement);
writeln('Enter the time taken (in seconds): ');
readln(time);
velocity := displacement / time;
writeln('The velocity of the object is: ', velocity:0:2, ' m/s');
end.