написать программу для вычисления при равномерном прямолинейном движении

[arai uzbekova]

если известны значения времени в пути и скорости.Ниже приведен рекомендуемый вид экрана во время работы программы
Вычисление расстояния
Введите время в пути(в часах)и нажмите <Enter>-->6.2
Введите скорость движения (в км/ч)и нажмите <Enter>-->90

Расстояние ,преодоленное за 6.2 ч,составляет 558км

[BDA]

Что именно вызывает затруднения?

[domovou]

var vr,sk:real;
begin
write('Вычисление расстояния');writeln;
write('Введите время в пути(в часах)и нажмите <Enter>-->');readln(vr);
write('Введите скорость движения (в км/ч)и нажмите <Enter>-->');readln(sk);
writeln;
writeln('Расстояние ,преодоленное за ',vr:0:1,' ч,составляет ',vr*sk:0:0,'км');
readln;
end.