program dem_so;
uses crt;
var A:array[1..1000] of integer;
n,i,dc,dl:integer;
begin
clrscr;
write('Nhap n: '); readln(n);
dc:=0; dl:=0;
for i:=1 to n do
write('A[',i,']= '); readln(A[i]);
if A[i] mod 2=0 then dc:=dc+1 else dl:=dl+1;
end;
writeln('Co ',dc,' so chan');
writeln('Co ',dl,' so le');
readln;
end.
Uses crt;
if A[i] mod 2=0
then dc:=dc+1
else dl:=dl+1;
readln
Để xác định nhiệt dung riêng của một chất lỏng, người ta đổ chất lỏng đó vào 20g nước ở 100°C. Khi có sự cân bằng nhiệt, nhiệt độ của hỗn hợp nước là 37,5°C, mh = 140g. Biết nhiệt độ ban đầu của nó là 20°C, CH.o=4200 J/kg.K. Giúp em với, em cảm ơn nhiều ah
giúp toyyy vssssssssssssssssssssssssssss
giải bài IV từ câu 6 đến câu 11
viết lại câu sau sao cho nghĩa không thay đổi 1,Global warming has caused many natural disasters -> Natural disasters...... 2.It is Tan's 15th birthday next week -> Tan will......... 3.The noise from the music club is lond, so the resident of the street cannot sleep -> Because of..... 4. The soil is poisoned because farmers use too many pesticides and herbicides -> If....
Trình bày vị trí giới hạn lãnh thổ dân cư Châu Mỹ
giải bài IV từ câu 1 đến 5 hộ mình nha
Choose the word that has the underlined part is pronounced differently from the others. 1. A.bikes B.balls C.robots D.desks 2. A.engineer B.greeting C.teeth D.street 3. A.wanted B.needed C.closed D.blended
câu 19 với ạ, nhanh giúp em với, em sắp thi r
Giúp vs ạ Công ước liên hợp quốc của trẻ em có mấy nhóm quyền Cám ơn mọi ng nhiều
Theo em, khi bị bỏng do vôi bột người ta sẽ sơ cứu theo phương thức nào là tối ưu giải thích lựa chọn ấy Phương án 1: rửa sạch vôi bột bằng nước rồi lau khô Phương án 2: lau khô vôi bột, sau đó rửa lại bằng dung dịch NH4Cl 5% hoặc bằng giấm bằng chanh giúp mình với ạ
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
