Читайте также:
|
|
Dim fac As Double
Dim a As Integer
‘ функция вычисления факториала
Private Function FACTORIAL(n As Integer) As Double
Dim i As Integer
Dim f As Double
If n = 0 Or n = 1 Then
FACTORIAL = 1
Else
FACTORIAL = FACTORIAL(n - 1) * n
End If
End Function
Private Sub Command1_Click()
' основная программа
a = Val(InputBox("введите число"))
fac = FACTORIAL(a)
Print "a="; a
Print "факториал ="; fac
End Sub
Private Sub Command2_Click()
Form1.Cls
End Sub
Private Sub Command3_Click()
End
End Sub
Особенности процедуры-функции:
1. При вычислении факториала происходит обращение функции к самой себе, но с меньшим значением аргумента n-1 по сравнению с первым вызовом n.
2. При вычислении факториала не используется цикл.
Необычная операция согласно требованиям Федерального закона 115-ФЗ.
Операция, содержащая признаки и критерии необычности, а также любые операции, которые, по мнению сотрудников Банка, могут осуществляться с целью отмывания доходов, полученных преступным путем, и/или финансирования терроризма.
3. Участие банков в государственной системе противодействия легализации (отмыванию) доходов, полученным преступным путем. Внутренний контроль банка в целях ПОД/ФТ согласно требованиям Федерального закона 115-ФЗ.
В России основным нормативным документом, регулирующим отношения физических и юридических лиц, а также государственных органов, осуществляющих контроль операций с денежными средствами и иным имуществом, является Федеральный закон от 07.08.2001г. №115-ФЗ «О противодействии легализации (отмыванию) доходов, полученных преступным путем, и финансирования терроризма.» Основной целью его принятия является защита прав и законных интересов граждан, общества и государства путем создания правового механизма противодействия легализации (отмыванию) доходов полученных преступным путем, и финансированию терроризма.
Деятельность Банка по выявлению операций подлежащих обязательному контролю, и иных операций с денежными средствами или иным имуществом, связанных с легализацией (отмыванием) доходов, полученных преступным путем, и финансированием терроризма. Коммерческие банки обязаны разработать правила внутреннего контроля, а так же программы его осуществления. Правила внутреннего контроля должны включать в себя порядок документального фиксирования необходимой информации, порядок обеспечения конфидициальности требования к подготовки обучению кадров, критерии выявления и признаки необычных сделок, операций подлежащих обязательному контроля, а также обеспечивать своевременное предоставление необходимых сведений в органы государственной власти и Банк Росссии.
Дата добавления: 2014-12-20; просмотров: 32 | Поможем написать вашу работу | Нарушение авторских прав |