Pascal Бабу Ягу пригласили ** должность директора фирмы. В первый день к ней пригласили...

Question

Pascal Бабу Ягу пригласили на должность директора фирмы. В первый день к ней пригласили двух курьеров. Каждый последующий день количество курьеров устраивалось. Баба яга согласилась когда прислали на менее 500 курьеров . Сколько курьеров было прислано в 2,3,4,..n день. На какой день баба яга согласилась.

Answer 1

Prjgram gt;
var i,d,s:longint;
begin
s:=2;d:=2;i:=1;
while(s <500) do<br>begin
i:=i+1;
d:=3*d;
s:=s+d;
if(i mod 2 =0)then writeln( i,' тый день ', d);
end;
writeln(s);
end.