Задача в pascal Двое рабочих заработали вместе 900 рублей. Один работал 2 недели, а другой 4 недели. Сколько денег заработал каждый?
Надо написать программу в pascal

var w:real;beginw:=900/(2+4);writeln('Первый рабочий заработал ',w*2,' руб.');writeln('Второй рабочий заработал ',w*4,' руб.');end.Результат:Первый рабочий заработал 300 руб.Второй рабочий заработал 600 руб.