1)Viết chương trình in ra các số lẻ nhỏ hơn hoặc = n (nhập n từ bàn phím) 2)Mô tả thuật toán và viết chương trình nhập vào n số nguyên từ bàn phím đếm xem có bao nhiêu số nguyên dương trong n số đó? 3) Xét chương trình sau: Var S,i: integer begin S := 0to 5 do S := S+i; writeln(S); end. - Kết quả ct trên là bao nhiêu?