Регистрация
УмНяша01
19.05.2020 06:28
Информатика
Есть ответ 👍

Некто положил в банк s рублей. через сколько лет сумма вклада более, чем в 2 раза превысит первоначальный вклад, если годовой процент составляет x%.паскаль

293
455
Посмотреть ответы 2

Ответы на вопрос:

vlad199411003
vlad199411003
4,6(76 оценок)
Var s,x,sum: real; k: integer; begin write('s = '); readln(s); write('x = '); readln(x); sum: =s; k: =0; while sum< =2*s do   begin   k: =k+1;   sum: =sum+sum*x/100;   end; writeln('k = ',k); end. пример: s = 2000 x = 10 k = 8
жания112
жания112
4,8(23 оценок)
Pascal var n,a: integer; s,x,si: real; begin readln(x,n); si: =sin(x); for a: =1 to n do begin; s: =s+si; si: =sin(si); end; writeln(s); end.

Популярно: Информатика