program rasstoyanie;
var t, v, s:integer;
begin
writeln('введите время');
readln(t);
writeln('введите скорость');
readln(v);
s:=v*t;
writeln('расстояние, которое преодолел велосипедист: ', s);
end.
Объяснение:
