Question

Программа выполняется в паскале! Составьте  программу для решения следующей задачи:Процентная ставка по вкладу – 15% годовых. Первоначальный вклад составил А рублей. Через сколько лет он станет больше В рублей? Значения А и В вводятся с клавиатуры. Помогите плииз.

Answer 1

var A,B:real;count:integer;
begin
readln(A,B);
while A<B do
beginA:=A+A/100*15;
count:=count+1;
end;
writeln(count);
end.

Answer 2

вот рядом со словом "спасибо" должно быть