5. Giả sử mảng A có 10 phần tử kiểu số nguyên
a. Viết lệnh khai báo mảng A trên
b. Viết lệnh in giá trị của phần tử thứ 10 của mảng A
c. Viết lệnh nhập dữ liệu cho mảng A
5. Giả sử mảng A có 10 phần tử kiểu số nguyên
a. Viết lệnh khai báo mảng A trên
b. Viết lệnh in giá trị của phần tử thứ 10 của mảng A
c. Viết lệnh nhập dữ liệu cho mảng A
a. var A:array[1..10] of integer;
b. write(a[10]);
c.
for i:=1 to 10 do
begin
write(‘Nhap phan tu thu ‘,i,’: ‘); readln(a[i]);
end;
Câu 5:
a. Lệnh khai báo mảng A: A:array[1..10] of integer;
b. Lệnh in giá trị của phần tử thứ 10: Writeln(A[10]); (hoặc write(A[10]) đều được).
c. Lệnh nhập dữ liệu cho mảng A:
Repeat
Write(‘Nhap n= ‘); readln(n);
Until (n<=10);
For i:=1 to n do
Begin
Write(‘A[‘,i,’]= ‘); readln(A[i]);
End;