Решить задачу на языке программирования Pascal.
В текущем месяце бригада в каждый последующий день работы выпускала на три изделия больше, чем в предыдущий. В первый день было выпущено 42 изделия, что составило 67% дневной нормы. В месяце 26 рабочих дней. Сумеет ли бригада выполнить месячную норму?

var i:integer; answer:integer;n:integer; begin answer:=42; n:=Trunc(42/67)*100; for i:=1 to 26 do begin answer:=answer+3; if answer then Writeln(i,'Бригада не выполнила норму') else Writeln(i,'Бригада выполнила норму'); end; end.