Viết chương trình Pascal sử dụng biến mảng.

Đề: Viết chương trình Pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của dãy số và xuất ra màn hình dãy số đó. Độ dài của dãy số cũng được nhập từ bàn phím.

Giải:

Program Nhap_Va_In_Day_So;
Var n, i: integer; {n la bien so phan tu, i la bien dem}
        A:array[1..1000] of real; {So phan tu day khong > 1000}
Begin
     Writeln('Hay nhap do dai cua day so: ');
     Read(n);
     Writeln('Hay nhap gia tri cho ',n, ' phan tu cua day so');
     For i:=1 to n Do Readln(A[i]);
     Writeln('Cac phan tu trong day so la: ');
     For i:=1 to n Do Writeln(A[i]);
     Readln;
End.

Kết quả: