Паскаль: предприятие в год выпустило 40000 изделий. - вопрос №545001940000 от лунтик72 21.04.2023 00:56

Question

Информатика: Паскаль: предприятие в год выпустило 40000 изделий. за счет усовершенствования технологий процесса объем продукции в год увеличился на 5 %. определить, через сколько лет объем продукции станет больше 45000 в год.

лунтик72 · Answer

Program __;Var n:Byte;    a:Real;BEGIN  a:=40000;  n:=0;  Repeat    n:=n+1;    a:=1.05*a;  Until (a 45000);  Writeln(n);END.  ...