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

Những câu hỏi liên quan
Trần Thị Thuỷ Tiên
Xem chi tiết
helili
Xem chi tiết
Minh Nhân
23 tháng 10 2023 lúc 21:53

Acetic acid là gì?

Sa sa
Xem chi tiết
duong1 tran
22 tháng 10 2021 lúc 7:31

Sinh học 8 Bài 14: Bạch cầu - Miễn dịch

Hoan Đỗ Thị
22 tháng 10 2021 lúc 7:34

Sinh học 8 Bài 14: Bạch cầu - Miễn dịch

Khánh Linh Võ
Xem chi tiết
Anh Phạm
11 tháng 10 2021 lúc 12:51

uses crt;

var a:array[1..100] of integer;

i,n,d,tong :integer;

begin

clrscr;

d:=0;

tong:=0;

readln(n);

for i:=1 to n do

readln(a[i]);

end;

for i:=1 to n do

if (a[i]>0) then begin

d:=d+1;

if d=1 then begin writeln('trong day co so nguyen duong '); write(' vi tri cua cac so duong ',i); end

else

begin

tong:=tong+a[i];

write(' ',i);

end;

end

else if ((i=n)and(d=0)) then write(' khong co so duong');

writeln;

writeln(' tong so luong so nguyen duong trong day so: ',d);

writeln(' ton cac so nguyen duong: ',tong);

readln;

end.

 

Phuong Do
Xem chi tiết
Phuong Do
28 tháng 11 2021 lúc 17:53

các bạn làm câu 1 cho mình nha

Phuong Do
28 tháng 11 2021 lúc 17:54

đừng làm câu 2, câu 3, câu 4, câu 5 nha

 

Dương Huệ
Xem chi tiết
☆Châuuu~~~(๑╹ω╹๑ )☆
16 tháng 3 2022 lúc 16:04

undefined

Pudding Bánh
Xem chi tiết
Mạnh=_=
20 tháng 4 2022 lúc 19:23

ghi rõ ra

Khanh Lam Dang
Xem chi tiết
ERROR?
25 tháng 5 2022 lúc 15:29

bài nào ?

Nguyễn Lê Việt An
25 tháng 5 2022 lúc 18:57

bài ??? 

Minh Nguyễn
Xem chi tiết