Những câu hỏi liên quan
TT
Xem chi tiết
H24
Xem chi tiết
MN
23 tháng 10 2023 lúc 21:53

Acetic acid là gì?

Bình luận (1)
SS
Xem chi tiết
DT
22 tháng 10 2021 lúc 7:31

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

Bình luận (1)
HT
22 tháng 10 2021 lúc 7:34

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

Bình luận (0)
KV
Xem chi tiết
AP
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.

 

Bình luận (0)
PD
Xem chi tiết
PD
28 tháng 11 2021 lúc 17:53

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

Bình luận (2)
PD
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

 

Bình luận (0)
DH
Xem chi tiết
H24
16 tháng 3 2022 lúc 16:04

undefined

Bình luận (0)
PB
Xem chi tiết
H24
20 tháng 4 2022 lúc 19:23

ghi rõ ra

Bình luận (4)
KD
Xem chi tiết
H24
25 tháng 5 2022 lúc 15:29

bài nào ?

Bình luận (0)
NA
25 tháng 5 2022 lúc 18:57

bài ??? 

Bình luận (0)
MN
Xem chi tiết