viết chương trình nhập vào dãy số và in ra các sổ chẵn(sử dụng mảng)

viết chương trình nhập vào dãy số và in ra các sổ chẵn(sử dụng mảng)

0 bình luận về “viết chương trình nhập vào dãy số và in ra các sổ chẵn(sử dụng mảng)”

  1. program daysochan;

    uses crt;

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

         n,i:integer;

    begin

          clrscr;

          write(‘Nhap so luong phan tu: ‘);  readln(n);

          for i:=1 to n do

          begin

          write(‘Nhap so thu ‘,i,’: ‘);  readln(A[i]);

                  end;

           for i:=1 to n do

           if A[i] mod 2=0 then write(A[i],’)

    readln

    end.

    Bình luận

Viết một bình luận