Mời thí sinh CLICK vào liên kết hoặc ảnh bên dưới
Mở ứng dụng Shopee để tiếp tục làm bài thi
https://s.shopee.vn/AKN2JyAJAw
https://s.shopee.vn/AKN2JyAJAw
kinhthu.com và đội ngũ nhân viên xin chân thành cảm ơn!
viết chương trình pascal nhập mảng và thay thế các phần tử âm bằng số 0
Mọi người thân mến, mình đang cảm thấy bế tắc quá. Bạn nào tốt bụng có thể nhân lúc rảnh rỗi giúp mình với câu hỏi này được không?
Các câu trả lời
Câu hỏi Tin học Lớp 11
Câu hỏi Lớp 11
- Silic đioxit (SiO 2) tan chậm trong dung dịch kiềm đặc, nóng ; tan dễ trong dung dịch kiềm nóng chảy tạo thành silicat....
- Giải: \(2sin^2\left(x-\dfrac{\pi}{4}\right)=2sin^2x-tanx\)
- Dòng điện chạy qua bóng đèn hình của một ti vi thường dùng có cường độ 30 µA. Số electron tới đập vào màn hình của tivi...
- Theo dãy HNO3 - HPO3 - HAsO3 , tính axit tăng dần , giảm dần hay không thay đổi ? Vì sao ?
- tìm ảnh của đường tròn (C) qua phép quay tâm O, góc quay 90 độ a) (C):...
- Khi điện phân NaCl nóng chảy (điện cực trơ), tại catot xảy ra? A. sự khử ion Na+ B. sự khử ion Cl– C. sự oxi hóa ion...
- Ứng động của cây trinh nữ khi va chạm là? A. ứng động sinh trưởng B. quang ứng động C. ứng động không sinh trưởng D....
- Nêu và phân tích nguyên nhân thắng lợi ý nghĩa lịch sử của...
Bạn muốn hỏi điều gì?
Đặt câu hỏix
- ²
- ³
- √
- ∛
- ·
- ×
- ÷
- ±
- ≈
- ≤
- ≥
- ≡
- ⇒
- ⇔
- ∈
- ∉
- ∧
- ∨
- ∞
- Δ
- π
- Ф
- ω
- ↑
- ↓
- ∵
- ∴
- ↔
- →
- ←
- ⇵
- ⇅
- ⇄
- ⇆
- ∫
- ∑
- ⊂
- ⊃
- ⊆
- ⊇
- ⊄
- ⊅
- ∀
- ∠
- ∡
- ⊥
- ∪
- ∩
- ∅
- ¬
- ⊕
- ║
- ∦
- ∝
- ㏒
- ㏑
Để thực hiện yêu cầu trên, ta cần viết chương trình Pascal như sau:
```pascal
program thaythephantu;
var
a: array[1..100] of integer;
n, i: integer;
begin
write('Nhap so phan tu cua mang: ');
readln(n);
for i := 1 to n do
begin
write('Nhap phan tu thu ', i, ': ');
readln(a[i]);
if a[i] < 0 then
begin
a[i] := 0;
end;
end;
writeln('Mang sau khi thay the:');
for i := 1 to n do
begin
write(a[i], ' ');
end;
end.
```
Câu trả lời cho câu hỏi "viết chương trình Pascal nhập mảng và thay thế các phần tử âm bằng số 0" là viết chương trình Pascal như trên. Chương trình sẽ nhập một mảng số nguyên từ bàn phím và thay thế các phần tử âm bằng số 0, sau đó hiển thị mảng sau khi thay thế ra màn hình.
Cuối cùng, không quên giải phóng bộ nhớ cho mảng sau khi hoàn thành chương trình.
Sau khi thay thế xong, hiển thị mảng sau khi thay đổi ra màn hình.
Để thay thế phần tử âm bằng số 0, chúng ta sử dụng câu lệnh điều kiện if else.
Trong vòng lặp, kiểm tra nếu phần tử đó là số âm thì thay thế bằng số 0.