{* Задача 576 *}

Unit ZADACH576;
Interface
Implementation
Begin
 writeln('Пешеход прошел S1 км за T1 час. Какое расстояние пройдет пешеход за T2 часа?');
End.

Program zadach576;

Uses zadach576.pas; {* Эту строку можно удалить *}
Uses crt; {* Подключение модулей *}
Var {* Необходимые переменные *}
  s1 : real;
  t1 : real;
  s2 : real;
  t2 : real;
Begin
  clrscr; {* Очищаем экран *}
  Write('s1=');
  Read(s1);
  Write('t1=');
  Read(t1);
  Write('t2=');
  Read(t2);
  s2 := s1 / t1 * t2;
  writeln('s2= ', s2 : 2:2);
  readkey; {* Нажмите любую клавишу *}
End.