Впаскаль швейная фабрика выпустила 1200 костюмов, из них n% - составляют костюмы нового сезона. вывести количество костюмов нового сезона и сезона

Var n: integer;
begin
read(n);
writeln('New: ', (1200 * n) div 100);
writeln('Past: ', 1200 - ((1200 * n) div 100));
end.