Em có làm một bài tin học 10 với đề: Hãy viết chương trình pascal tìm kiếm khóa k (có hoặc không có) trong dãy số nguyên dương ạ, mong mọi người giúp em. Em có làm chương trình nhưng khi chạy nó lại báo lỗi:"

source.pas(3,6) Fatal: Syntax error, ":" expected but "[" found Error: /usr/bin/ppcx64 returned an error exitcode " ạ. Nếu ai có thể giúp em thì em cảm ơn nhé. Chương trình của em:

program find;
uses crt;
var A[1..100] of integer;
k, N, i, t: integer;
Begin
clrscr;
Write ('Nhap tu khoa k ');
Readln (k);
Write ('Nhap so phan tu trong day nguyen duong');
Readln (N);
i:=0;
t:=0;
For i:=i+1 to N do
Begin
If A[i] = k then
Writeln (k,'la phan tu thu ',i,' trong day so nguyen duong');
End;
Begin
If A[t] = k then
Writeln ( k,' khong la phan tu trong day so nguyen duong');
End;
End.

anh nào giỏi về pascal giúp đỡ em với ạ!!!

Trường THPT Chuyên Hùng Vương tổ chức thi ném bóng rổ. Mỗi lần ném trúng sẽ
được 2 hoặc 3 điểm. Được 2 điểm nếu khoảng cách thực hiện cú ném không vượt quá

d mét, được 3 điểm nếu khoảng cách thực hiện cú ném lớn hơn d mét, trong đó d là
một số nguyên không âm.
Có 2 đội thi đấu với nhau là đội 1 và đội 2. Hãy giúp Dũng chọn giá trị của d sao cho
số điểm của đội 1 trừ đi số điểm của đội bóng thứ 2 là tối đa.
INPUT:
Dòng 1: chứa số nguyên n ( 1 <= n <= 2 * 10^5 ) là số lần ném trúng của đội 1.
Dòng 2: chứa n số nguyên a[i] là khoảng cách ném trúng của đội 1 ( 1 <= a[i] <= 2 *
10^9 )
Dòng 3: chứa số nguyên m ( 1 <= m <= 2 * 10^5 ) là số lần ném trúng của đội 2
Dòng 2: chứa n số nguyên b[i] là khoảng cách ném trúng của đội 2 ( 1 <= b[i] <= 2 *
10^9 )
OUTPUT:
In ra 2 số theo dạng: a:b
Trong đó a là số điểm của đội 1, b là số điểm của đội 2 sao cho a – b max. Nếu có
nhiều kết quả in ra giá trị a lớn nhất
VD:
INPUT
5
3 7 9 2 1
2
13 12

OUTPUT: 15:6

INPUT

3
6 8 10
3
2 4 5

OUTPUT: 9:6

Subtask 1 : 50% số điểm tương ứng n, m <= 1000
Subtask 2: 50% số điểm tương ứng n, m <= 2 * 10^5

Cho dãy số a1, a2, a3, ... được định nghĩa như sau:
a1 = a2 = 1; an+2 = an+1 + an với mọi n  N
*
.

Yêu cầu: Cho trước một số nguyên dương k (10  k  1016). Hãy tìm 2 chữ số tận cùng của số ak
trong dãy số trên.
Dữ liệu vào: File văn bản CSTC.INP chỉ có một số nguyên dương k (10  k  1016).
Dữ liệu ra: File văn bản CSTC.OUT ghi ra 2 chữ số tận cùng của số ak trong dãy số được định
nghĩa như trên.