Начислить проценты по займу - Free Pascal

Формулировка задачи:

Тетя Клава взяла заем в кредитной организации подпольного типа. Проценты по займу начисляются каждый день. Сколько должна отдать тетя Клава уже «коллекторам» через год, если она взяла заем m рублей под p ежедневных процентов.

Решение задачи: «Начислить проценты по займу»

Листинг программы

var
  m,p: double;
begin
  writeln('Введите заем:');
  readln(m);
  writeln('Введите еждневный %:');
  readln(p);
 
  writeln('Через год(365дней) вернуть: ' , 365*m*(1+p/100));
end.

Объяснение кода листинга программы

Введенные данные сохраняются в переменных m и p типа double.
Затем программа выводит сообщение с просьбой ввести сумму займа.
После получения данных, программа выводит сообщение с просьбой ввести процентную ставку.
Далее программа производит расчет и выводит результат на экран.
Результатом вычислений является значение, равное займу, умноженному на 365 (количество дней в году) и процентной ставке, деленной на 100.
Значение переменной m используется в формуле для расчета процентов по займу.
Значение переменной p используется в формуле для расчета процентов по займу.
Проценты по займу рассчитываются путем умножения суммы займа на процентную ставку и деления на 100.
Результат вычислений выводится на экран.
Значение переменной m используется в формуле для расчета процентов по займу.
Значение переменной p используется в формуле для расчета процентов по займу.
Для расчета процентов по займу используется формула: проценты = сумма займа (1 + процентная ставка / 100) количество дней.
Результат вычислений выводится на экран.
Значение переменной m используется в формуле для расчета процентов по займу.
Значение переменной p используется в формуле для расчета процентов по займу.
Для расчета процентов по займу используется формула: проценты = сумма займа (1 + процентная ставка / 100) количество дней.
Результат вычислений выводится на экран.
Значение переменной m используется в формуле для расчета процентов по займу.
Значение переменной p используется в формуле для расчета процентов по займу.
Для расчета процентов по займу используется формула: проценты = сумма займа (1 + процентная ставка / 100) количество дней.