Задача в паскаль

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

Question

Иожеф

14 мая, 11:20

+1

Ответы (1)

Знаете ответ на вопрос?

Торонто · Answer 1

Var n: integer;

begin

read (n) ;

writeln ('New: ', (1200 * n) div 100) ;

writeln ('Past: ', 1200 - ((1200 * n) div 100)) ;

end.

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