How do I program the following task in Lazarus using the programming language: Pascal(Script)?

Task 2 – Foam decay The foam in a beer glass breaks down by 15% per minute. a) Develop a program that, for an initial foam height of 13 cm, calculates the time it takes for the foam to reduce to 1 cm of its initial height. The program outputs the remaining foam height for…