Написать программу в паскалеВ банк под 3% годовых кладут 1000 рублей. Через сколько лет сумма на вкладе будет 1500 рублей?
Написать программу в паскале
В банк под 3% годовых кладут 1000 рублей. Через сколько лет сумма на вкладе будет 1500 рублей?
Гость
Ответ(ы) на вопрос:
Гостьvar
a:real;
b, c: integer;
begin
b:=0;
a:=1000;
while a<=1500 do
begin
a:=a+(a*0.03);
inc(c);
end;
write ('Через ', c,'лет ');
end.
Не нашли ответ?
Похожие вопросы