Question

1. Khai báo biến mảng B được đánh thứ tự từ thứ 5 đến thứ 95, mọi phần tử biến số thực.
2. Nhập dữ liệu cho phần tử thứ 10 đến 20 của mảng B.
3. Xuất giá trị của 50 phần tử thứ 5 của mảng B.

Answer 1

1: var b:array[5..95]of real;

2: for i:=10 to 20 do

begin

write('B[',i,']='); readln(b[i]);

end;