В банк положили конкретную сумму s под 3% годовых определить через сколько лет сумма превысит полтора s информатика

Question

Катуня

12 января, 04:15

+1

Ответы (1)

Знаете ответ на вопрос?

Рогнеда · Answer 1

Var i: integer;

s: real;

begin

i:=0; s:=1;

repeat

i:=i+1;

s:=s*1.03;

until s>1.5;

writeln ('число лет = ', i) ;

end.