Регистрация
Оператор2288
26.11.2020 22:19
Информатика
Есть ответ 👍

Pascalabc ввести начальный вклад клиента в банк и процент годового дохода. определить через сколько лет вклад превысит 1 млн. рублей

103
104
Посмотреть ответы 2

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

Dipper17
Dipper17
4,5(22 оценок)

program raf105;

var  

  v,p: real;

  i,let: integer;

begin

write('вклад: ');

readln(v);

write('процент годового дохода: ');

readln(p);

while v < 1000000 do

begin

  let: = let+1;

  v: = v+v/100*p;

end;

writeln('вклад превысит 1 млн. через ',let,' лет');

end.

pascalabc 3.4.2
ma220299
ma220299
4,6(21 оценок)

ответ: хз если честно

объяснение:

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