Юрий
6 год назад
В банк положили конкретную сумму s под 3% годовых определить через сколько лет сумма превысит полтора s информатика
ОТВЕТЫ
Каллистрат
Jul 2, 2019
Var i: integer;
s: real;
begin
i:=0; s:=1;
repeat
i:=i+1;
s:=s*1.03;
until sgt;1.5;
writeln(число лет = ,i);
end.
s: real;
begin
i:=0; s:=1;
repeat
i:=i+1;
s:=s*1.03;
until sgt;1.5;
writeln(число лет = ,i);
end.
154
Смежные вопросы:
