Question

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

Answer 1

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