Начиная с января на счет клиента в начале месяца переводится z руб. (заработная плата) и снимается к руб. (коммунальные услуги); в конце месяца производится начисление р % от накопленной суммы. последовательно месяц за месяцем суммируя начисляемые проценты, определить их сумму за год. вычисления прекратить, если в каком-либо месяце эта сумма превысит значение а.

ТёмаТащер ТёмаТащер    2   08.09.2019 11:50    12

Ответы
polinaguskova polinaguskova  07.10.2020 00:46
Var z,k,p,s,sp,a:real; n:integer;
begin
readln(z,k,p,a);
s:=0; sp:=0; n:=0;
while (n<12)and(sp<a) do
 begin
 n:=n+1;
 s:=s+z-k;
 sp:=sp+s*p/100;
 s:=s+sp;
 end;
 writeln('n = ',n);
writeln(sp:4:2);
end.

Пример:
35000 3500 0.5 15000
n = 12
13093.25
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика