R(sqr(c)+c, d) - по тому что ты в начале указал что счетчик процедуры будет интеджером, а если вывести из коренья то может получится и дробное число...
Надстройки, поиск решения, выделяем.
См приложение.
Program kvart;
var k: real;
begin
k:=4500; // известно что квартплата 4500
k:=k*1.3; //мы увеличиваем на 30 %
k:=k*1.4; // новую квартплату мы увеличиваем ещё на 40 %
write(k); // выводим значение новой квартплаты
<span>end.
Можно организовать ввод квартплаты тогда вместо строки k:=4500;
мы напишем readln(k);</span>
Программа находится в фотографии