СРОЧНОООО pascal ЛАЗАРУС
Побудуйте математичну модель і складіть проект для визначення, за скіль ки годин робітник виконає план в Х деталей, якщо за першу годину роботи він виготовив У деталей, а за кожну наступну годину виготовляє на 1 де таль більше, ніж за попередню.
Answers & Comments
Verified answer
program Workshop;
var
U, X, t, n: integer;
begin
writeln('Введіть кількість деталей, яку потрібно виготовити: ');
readln(X);
writeln('Введіть кількість деталей, виготовлених за першу годину: ');
readln(U);
t := 1;
n := U;
while n < X do
begin
t := t + 1;
n := U * t + (t * (t - 1)) div 2;
end;
writeln('Робітник виконає план в ', t, ' годин');
end.