Question

[Huỳnh Trúc Ly]

Viết chương trình nhập mảng gồm N số nguyên từ bàn phím và in ra màn hình các dãy số vừa nhập đó

Answer 1

[Phía sau một cô gái]

program Nhapmang;

const MAX_N = 100;

var A: array[1..MAX_N] of integer;

      N, i:integer;

begin

      write('Nhap so phan tu: '); readln(N);

      for i:= 1 to N do begin

            write('Nhap phan tu ', i, ': ');

            readln(A[i]);

      end;

      writeln('Day so vua nhap la:');

      for i:= 1 to N do

            write(A[i], ' ');

end.