Dưới đây là chương trình Pascal để tính tổng N số tự nhiên đầu tiên:

```
program TinhTong;
var
N, S, i: integer;
begin
write('Nhap so nguyen duong N: ');
readln(N);

S := 0;
for i := 1 to N do
begin
S := S + i;
end;

writeln('Tong cua ', N, ' so tu nhien dau tien la: ', S);
readln;
end.
```

Giải thích:

Dòng 2: khai báo biến `N`, `S` và `i` kiểu số nguyên.
Dòng 4: yêu cầu người dùng nhập giá trị của `N`.
Dòng 6: khởi tạo giá trị của biến `S` bằng 0.
Dòng 7-9: sử dụng vòng lặp `for` để tính tổng `S` của `N` số tự nhiên đầu tiên. Trong mỗi vòng lặp, giá trị của biến `i` sẽ được tăng lên 1 và cộng vào giá trị của biến `S`.
Dòng 11-12: in ra kết quả của tổng `S`.
Dòng 13: dừng chương trình để người dùng có thể xem kết quả.
Chúc em thành công!