паскаль цикл for + факториал

[Jon1kus]

спасибо большое=)
Тоже самое задание для экселя сделал.

Private Sub CommandButton1_Click()
Const s As Double = 3.1415
f = 1
s = 1
For i = 1 To n
Range("A" & i).Value = i
Range("B" & i).Value = f
Range("C" & i).Value = s * 1 / f

Next i
End Sub

может где ошибся?=)

From Stilet: Однозначно ошибся. В нарушении правил форума. Я в следующий раз не ошибусь закрыв тему