Моделирование экономических процессов (Паскаль)

• Моделирование позволяет оценить платёжеспособность клиента и риски невозврата кредита. Основные параметры: кредитный рейтинг, сумма кредита, срок, процентная ставка.
• Ключевые аспекты:

  • кредитный рейтинг – определяет вероятность одобрения кредита и ставку;
  • платёжная дисциплина – история предыдущих платежей;
  • просрочки – количество и длительность задержек платежей.

Пример.

function CheckCredit (S: integer; A:

real; T: integer;

R: real): boolean;

// S = 65 (кредитный рейтинг)

// A = 250000 (запрашиваемая сумма)

// T = 36 (срок кредитования)

// R = 12 (базовая ставка %)

var Х: boolean;

Begin

   Х := false; // Ответ одобрения

   if S >= 60 then begin

      Х := true;

      if S >= 80 then R := R - 3.0

      // Премиальная ставка

      else if S <= 70 then R := R + 2.0;

      // Повышенная ставка

   end;

   CheckCredit := Х;

End.