Câu 4: Khai báo VAR A: array[1..5] of integer; Kết quả lệnh c:=A[4]/A[2], kiểu dữ liệu của c là: (1điểm) *
integer
real
longint
int64
Câu 5: Với khai báo VAR A: array[1..5] of integer; Kết quả lệnh d:=A[4] DIV A[2], kiểu dữ liệu của d là: (1điểm) *
integer
real
int64
longint
Câu 6: Em hãy viết chương trình pascal nhập dãy số nguyên A có 10 phần tử và thực hiện phép tính tổng các phần tử trong dãy A rồi in ra kết quả
4. Real
5. integer
6.
Program BTH;
uses crt;
var a:array[1..10] of longint;
s,i:longint;
Begin
clrscr;
for i:=1 to 10 do
Begin
write(‘Nhap so thu ‘,i,’ : ‘);readln(a[i]);
s:=s+a[i];
end;
writeln(‘Tong day so tren la: ‘,s);
readln;
end.