ежегодный прирост рыб в пруду составляет 15%. Запасы рыбы оценены в А тонн. Ежегодный план отлова В тонн. Подсчитать , сколько лет можно выдерживать заданный план ?

НА ПАСКАЛЕ! ПОЖАЛУЙСТА!

Но вводил 1 и 2, тоже 0 показало

введи так что бы первое число было больше второго

Ввод а 4996 ввод б 1819 Вывод 3Ввод а 1128 ввод б 577 Вывод 2Ввод а 2978 ввод б 1176 Вывод 3Ввод а 1042 ввод б 598 Вывод 2Ввод а 3233 ввод б 1128 Вывод 3

Но вдруг у нас училка не поймет то что надо чтобы было больше, как это обозначить чтобы первое было больше второго?

если первое меньше второго то план нельзя выполнить т к рыбы меньше чем нужно

vara,b:real;i:integer;begini:=0;readln(a,b);while b<a dobegina:=a*1.15;a:=a-b;i:=i+1;end;writeln('План можно выдерживать', i, ' лет' );end.