Viết chương trình nhập vào mảng số nguyên gồm 10 phần tử sau đó in ra màn hình phần tử có giá trị lớn hơn hoặc bằng 9 21/07/2021 Bởi Rose Viết chương trình nhập vào mảng số nguyên gồm 10 phần tử sau đó in ra màn hình phần tử có giá trị lớn hơn hoặc bằng 9
program bt;uses crt;var a: array[1..10] of integer; i: byte;begin clrscr; for i := 1 to 10 do begin write(‘Nhap a[‘,i,’]=’); readln(a[i]); end; write(‘Cac so lon hon hoac bang 9 trong mang la:’); for i := 1 to 10 do if a[i] >= 9 then write(a[i]:3); readlnend. Xin câu trả lời hay nhất ạ :3 Bình luận
program bt;
uses crt;
var a: array[1..10] of integer;
i: byte;
begin
clrscr;
for i := 1 to 10 do begin
write(‘Nhap a[‘,i,’]=’); readln(a[i]);
end;
write(‘Cac so lon hon hoac bang 9 trong mang la:’);
for i := 1 to 10 do if a[i] >= 9 then write(a[i]:3);
readln
end.
Xin câu trả lời hay nhất ạ :3