Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím ( KO CHÉP Ở TRÊN MẠNG)

0 bình luận về “Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số. Độ dài của dãy cũng được nhập từ bàn phím ( KO CHÉP Ở TRÊN MẠNG)”

1. program phuongt;
   uses crt;
     var A: array[1..500] of integer;
           i, n: integer;
   begin
          clrscr;
          write(‘Nhap do dai cua day so = ‘); readln(n);
          for i:=1 to n do
          begin
                 write(‘A[‘, i, ‘] = ‘); readln(A[i]);
          end;
          readln
   end.

   Bình luận

2. program phuongt;
   uses crt;
     var A: array[1..500] of integer;
           i, n: integer;
   begin
          clrscr;
          write(‘Do dai cua day so la = ‘); readln(n);
          for i:=1 to n do
          begin
                 write(‘A[‘, i, ‘] = ‘); readln(A[i]);
          end;
          readln
   end.

   Bình luận