Question

100 БАЛОВ !!!!!!!!!!!!!!!
используя оператор repeat

Задача. Сумма 8000 рублей положена в сберегательный банк, при этом прирост составляет 4% годовых. Напишите на языке Паскаль программу, определяющую, через какой промежуток времени первоначальная сумма увеличится в 4 раза.

Answer 1

Ответ:

var years, start:real;

begin

years : = 0;

start : = 8000;

while start < 16001 do

begin

start : = start + start / 80 * 4;

years : = years + 1;

end;

writeln (years:0:0, ' years');

readln ();

end.

Вроде-бы так, но я не уверен