{* Задача 545 *}

Unit ZADACH545;
Interface
Implementation
Begin
 writeln('Расстояние между домами, в которых живут Петя и Коля, 1200 м. Однажды они вышли каждый из своего дома и направились навстречу друг другу. Когда Петя прошел А метров, они встретились. Во сколько раз расстояние, которое прошел Коля больше расстояния, которое прошел Петя?');
End.

Program zadach545;

Uses zadach545.pas; {* Эту строку можно удалить *}
Uses crt; {* Подключаем внешние файлы *}
Const {* Константы *}
  s = 1200;
Var {* Объявление переменных *}
  a : real;
Begin
  clrscr; {* Очищаем экран *}
  write('a=');
  read(a);
  write((s - a) / a : 2 : 3, '  раз');
  readkey; {* Ждем нажатия пользователя *}
End.