giúp e lm bài này vs e đg kt 1 tiết viết phương trình nhập độ dài cũng như các phần tử của dãy số chạy chương trình để kiểm tra kết quả với:N=4;các p

0 bình luận về “giúp e lm bài này vs e đg kt 1 tiết viết phương trình nhập độ dài cũng như các phần tử của dãy số chạy chương trình để kiểm tra kết quả với:N=4;các p”

1. Program Hotboy;

   Uses crt;

   Var A :array[1..100] of integer;

   sn,i : longint;

   Begin

   Clrscr;

   Write(‘nhap so n’);

   For i:=1 to n do

   Write(‘A[‘,i,]’);

   Readln(A[i]);

   Readln

   End.

   Bình luận

2. program oken;
   uses crt;
   var a: array [1..100] of integer;
       n,i: integer;
   begin
       clrscr;
       write(‘Nhap so phan tu cua mang: ‘); readln(n);
       for i:=1 to n do    
           begin
               write(‘a[‘,i,’]: ‘);
               readln(a[i]);
           end;
       readln;
   end.

   Bình luận