Question

Получив первую зарплату, Вы задумываетесь о самостоятельной покупке Apple iPhone 6 16Gb стоимостью 33450 руб. (на 1 января 2017 г). Ваша первая зарплата составила 2800 руб. и по перспективным прогнозам должна повышаться каждый месяц на 4%. Когда Вы сможете позволить себе эту покупку, если со своей зарплаты Вам необходимо оплачивать интернет (350 руб. в месяц), а цена модели Apple iPhone 6 16Gb снижается в среднем 1% в месяц.

Answer 1

Vara,b,i:real;begini:=0;a:=2800;b:=33450;while a<b do begina:=a*1.04-350;b:=b*0.99;i:=i+1;end;writeln(i);end.

Answer 2

Var
a,b,i:real;
begin
i:=0;
a:=2800;
b:=33450;
while a<b do begin
a:=a*1.04-350;
b:=b*0.99;
i:=i+1;
end;
writeln(i);
end.

Answer 3

Pascal abc

Answer 4

Var
i:integer;
b,c,l:real;
begin
l:=0;
i:=1;
b:=2800;
c:=33450;
while b<c do begin
b:=b*1.04;
c:=c*0.99;
i:=i+1;
l:=b*1.04-350+l;
end;
writeln(i);
end.

Answer 5

Вот правильный код