Нужно написать программу, которая по заданному числу n, пишет на сколько частей делят плоскость n прямых. При этом никакие две прямые не параллельны и никакие три не пресекаются в одной точке.

Roma,

Var n: integer;
Begin
  ReadLn(n);
  WriteLn( 1 + (n*(n + 1) div 2) );
End.

Volvo, спасибо!