Câu 1 và Câu 2 xem trong sgk nha !
Câu 3: Tính tổng N số tự nhiên đầu tiên với N nhập từ bàn phím.
Có dạng S= 1+2+3+...+N.
Chương trình có thể như sau:
Program tinhtongS;
Uses CRT;
Var S : Longint; i,N : Integer;
Begin
Clrscr;
Write('Nhap N = '); Readln(N);
S:=0;
For i := 1 to N do
     S:=S+i;
Write('S= ', S);
readln;
End.