Hoàng A.Đức
Hỏi từ APP VIETJACK
viết chương trình sử dụng biến mảng để nhập các phân tử của dãy số n phân tử kiểm tra dãy số đã cho có bao nhiêu số nguyên dương và bao nhiêu số nguyên âm
Quảng cáo
1 câu trả lời 169
uses crt;
var a:array[1..100]of integer;
i,n,dem1,dem2:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
dem1:=0;
dem2:=0;
for i:=1 to n do
begin
if a[i]>0 then inc(dem1);
if a[i]<0 then inc(dem2);
end;
writeln('So so nguyen duong la: ',dem1);
writeln('So so nguyen am la: ',dem2);
readln;
end.
Quảng cáo
Bạn hỏi - Chuyên gia trả lời
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45518
-
Hỏi từ APP VIETJACK28426
Thành viên hăng hái nhất trong tuần
-
Pumpkin
55 điểm
-
ikư~ikư 50 điểm
-
Hội A lăng 25 điểm
-
MinhHang Le 20 điểm
-
Hương Doãn 20 điểm
-
Z Z 20 điểm
-
Thủy Thi 20 điểm
-
Nhựt Anh Phan 20 điểm
-
Lưu Võ Trung 20 điểm
-
Như Ý Nguyễn Ngọc 20 điểm
-
Bảo châu Nguyễn 20 điểm
-
Duong Thuy 20 điểm
-
Hương Liên Bách 20 điểm
-
Hoàng My Hoàng My 20 điểm
-
Duyên Trần Thị 20 điểm
Rút gọn
Bài viết mới nhất Lớp 8
-
4 năm trước11252
-
4 năm trước10660
-
4 năm trước9321
-
4 năm trước9508
-
4 năm trước9068
Gửi báo cáo thành công!
