Var a,b,c:real;
Begin
Write(Введите время движения: ); readln(a);
Write(Введите длину пути: ); readln(b);
c:=b/a;
write(Скорость равна: , c);
End.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.