Ôn tập cuối năm

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Yan Dyi

Viết chương trình nhập vào dãy số A gồm N phần tử (N nhập từ bàn phím) In ra màn hình các phân tử lag số chẵn?

Phía sau một cô gái
4 tháng 5 2023 lúc 20:48

program HienThiSoChan;

var

      N, i: integer;

      A: array[1..50] of integer;

begin

      writeln('Nhap so nguyen duong N:');

      readln(N);

      writeln('Nhap day so A gom ', N, ' phan tu:');

      for i := 1 to N do

      begin

            readln(A[i]);

            if A[i] mod 2 = 0 then

            begin

                  writeln('Phan tu thu ', i, ' la so chan: ', A[i]);

            end;

      end;

      readln;

end.


Các câu hỏi tương tự
Phạm Linh
Xem chi tiết
Ngọc Ty
Xem chi tiết
Nguyễn Khải Minh
Xem chi tiết
Vẹt Vẹt
Xem chi tiết
đạt lê
Xem chi tiết
Vân anh
Xem chi tiết
Bao Duong
Xem chi tiết
Thánh Tiền
Xem chi tiết
Huỳnh Ngọc Nguyên
Xem chi tiết