Экскаватор вырыл котлован объемом v м^3 земли. в первый день он вынул д м^3, а в последующие дни он вынимал на 1м^3 больше. за сколько дней был вырыт котлован?
var v,d,n:integer; begin writeln('Объем котлована') readln(v); writeln('Производительность эскаватора в первый день'); readln(d); n:=0; repeat v:=v-d; d:=d+1; n:=n+1; until v<=0; writeln( n, 'Дней ушло на рытьё котлована'); end.
var v,d,n:integer;
begin
writeln('Объем котлована')
readln(v);
writeln('Производительность эскаватора в первый день');
readln(d);
n:=0;
repeat
v:=v-d;
d:=d+1;
n:=n+1;
until v<=0;
writeln( n, 'Дней ушло на рытьё котлована');
end.