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

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

Question

Абсамет

3 марта, 19:12

+5

Ответы (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% - составляют костюмы нового сезона. Вывести количество костюмов нового сезона и прошедшего сезона