Задача в паскаль Швейная фабрика выпустила 1200 костюмов, из них n% - составляют костюмы нового сезона. Вывести количество костюмов нового сезона и прошедшего сезона
Var n: integer; begin read(n); writeln('New: ', (1200 * n) div 100); writeln('Past: ', 1200 - ((1200 * n) div 100)); end.