Для этого упражнения мы выбрали задачу вычисления сложных процентов. Программа будет высчитывать доход, исходя из информации о процентных ставках, сумме депозита и времени хранения.
Наберите в текстовом редакторе программу,приведенную в листинге 2.2, и назовите ее interest. Номера строк набирать не нужно. Сделайте файл interest исполняемым, следуя инструкциям, приведенным ниже.
После этого попытайтесь запустить программу, набрав в командной строке
perl interest
В листинге 2.3 приведен пример вывода программы interest.
Проведем анализ программы.
- Строка 1. В этой строке находятся имя программы интерпретатора (вы можете изменить его в соответствии с конфигурацией вашей системы) и ключ -w. Всегда включайте режим вьщачи предупреждений!
- Строка 3. Пользователь вводит размер месячного взноса.
- Строка 4. Значение переменной $pmt считывается со стандартного устройства ввода (клавиатуры).
- Строка 5. Удаляется символ перевода строки в конце $pmt.
- Строки 7~9. Считывается с клавиатуры значение переменной $interest и удаляется символ перевода строки.
- Строки 11-13. Считывается с клавиатуры значение переменной $mons и удаляется символ перевода строки.
- Строка 16. Содержимое переменной $interest делится на 12, результат помешается в переменную $interest.
- Строка 18. Вычисляются сложные проценты, результат заносится в переменную Stotal.
- Строки 20—21. Печать результатов.