Вкассу положили 2000 рублей. каждый месяц на имеющуюся в кассе сумму начисляют 1%. через сколько месяцев сумма достигнет 20 000 рублей? напишите программу на pascal abc.

dianadiadyshyn dianadiadyshyn    3   05.07.2019 08:40    0

Ответы
kanyakhin kanyakhin  28.07.2020 20:58
Var k,n,i,j:longint;
begin 
k:=20000; 
While k<200000 do 
begin  k:=k+(k div 100 *1);  inc(i); end; 
writeln(i);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика