Code bằng c++ (sr vì mình không biết pascal :<)

#include <iostream>
using namespace std;
int main()
{
    int n,tt=1;
    cin>>n;
    if(n==0){
        cout<<tt;
        return 0;
    }
    for(int i=1;i<=n;i++){
        tt+=i*6;
    }
    cout<<tt;
    //samon247
    return 0;
}

Giải thích:

Ta dễ dàng thấy được mỗi số tăng lên thì số hình lục giác sẽ tăng lên 6 ô và = số ô cũ + 6 (trong đó ô đầu tiên bằng 1, các ô tiếp theo lần lượt là: 6 12 16 18 24 ...)

uses crt;
var n,i,s:longint;
begin
clrscr;
   writeln('Input'); readln(n);
   writeln('Output');
      s:=1;
      for i:=1 to n do s:=s+6*i;
   writeln(s);
readln
end.

////////////////////////////////////////////////////////

Giải thích:

Mình nhận ra khi đếm số các ô là: vòng thứ n thì có nx6 ô!

Thì từ đó mình làm là mới vào tổng sẽ bằng 1 vì trường hợp đặc biệt là có một ô 0

Rồi cứ chạy từ 1 tới n là tăng tổng: i x 6

Cuối cùng xuất xuất tổng ra là xong!

Một số text cho bạn tham khảo: