Запишите на языке Pascal следующее выражение

(sqrt(abs(a)+b))*(sqrt(abs(a)+b))

a в квадрате плюс b в квадрате:  

;

с каждым днем количество ряски увеличиваеется в 2 раза. 30 июня ряска покрыла всю поверхность озера, значит 29 июня ряской была покрыта половина озера.