program DistanceCalc;
vatime, speed, distance: real;
begiwriteln('Enter the time (in hours): ')readln(time);
writeln('Enter the speed (in km/h): ')readln(speed);
distance := time * speed;
writeln('The distance traveled is: ', distance:0:2, ' km');
end.
program DistanceCalc;
va
time, speed, distance: real;
begi
writeln('Enter the time (in hours): ')
readln(time);
writeln('Enter the speed (in km/h): ')
readln(speed);
distance := time * speed;
writeln('The distance traveled is: ', distance:0:2, ' km');
end.