Bài 8. Lặp với số lần chưa biết trước

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

VIẾT chương trình nhập vào 1 dãy số nguyên,nhập vào 1 số nguyên a bất kỳ xuất ra các số trong dãy số lớn hơn số a vừa nhập

Phía sau một cô gái
17 tháng 4 2023 lúc 15:25

program TimSoLonHonA;

var

     a: array of integer;

     n, i, x: integer;

begin

     write('Nhap so phan tu cua day so: ');

     readln(n);

     SetLength(a, n);

     for i := 0 to n - 1 do

     begin

          write('Nhap gia tri phan tu thu ', i + 1, ': ');

          readln(a[i]);

     end;

     write('Nhap vao mot so nguyen bat ky: ');

     readln(x);

     writeln('Cac so lon hon ', x, ' la: ');

     for i := 0 to n - 1 do

     begin

          if (a[i] > x) then

               writeln(a[i]);

     end;

end.


Các câu hỏi tương tự
Yết Thiên
Xem chi tiết
NGUYỄN LÊ XUÂN THỊNH
Xem chi tiết
nguyễn thị như ý
Xem chi tiết
HUY HUỲNH QUANG
Xem chi tiết
su nè
Xem chi tiết
huỳnh duy cát
Xem chi tiết
hoho209
Xem chi tiết
Yết Thiên
Xem chi tiết
Cuong Ly
Xem chi tiết