На предприятии 2-м рабочим выделена премия (n руб). разделить эту премию между рабочими в зависимости от стажа их работы на предприятии (прямо пропорциональная зависимость). стаж вводится с клавиатуры.

//PascalABC.NET 3.2 сборка 1318

begin
  var n:=ReadInteger('Премия:');
  var w1:=ReadInteger('Первый рабочий:');
  var w2:=ReadInteger('Второй рабочий:');
  writeln('Первому рабочему:',n*(w1/(w1+w2)));
  writeln('Второму рабочему:',n*(w2/(w1+w2)));
end.

Пример ввода:
24
3
9
Пример вывода:
6
18