uses crt;
var i,n:longint;
a:array[1..1000000] of longint;
begin
clrscr;
readln(n);
for i:=1 to n do
write('a[',i,']=');
readln(a[i]);
end;
for i:=1 to n do if (a[i] mod 3=0) and (a[i] mod 2<>0) then write(a[i],' ');
readln
end.
program chia_3_khong_2;
var A:array[1..1000] of integer;
n,i,d:integer;
write('Nhap so luong phan tu cua day: '); readln(n);
d:=0;
write('Nhap so thu ',i,': '); readln(A[i]);
if (A[i] mod 3=0) and (A[i] mod 2<>0) then d:=d+1;
write('Co 'd,' so thoa man');
if (A[i] mod 3=0) and (A[i] mod 2<>0) then write(A[i],' ');
readln;
lập dàn ý cho bài văn miêu tả vẻ đẹp ở quê hương em
vẽ đậu mầm nhaaaaaaaaaaaaaaaaaaa
Bạn Na làm một cái hộp dạng hình lập phương bằng bìa có cạnh là 2,5dm.Hỏi bạn Na làm cái hộp đó hết bao nhiêu giấy bìa?
trên nửa mặt phẳng bờ chứa tia by, vẽ hai tia bn ,bm sao cho ybm=60 ,ybm=140 trong 3 tia by ,bn,bm tia nào nằm giữa 3 tia còn lai vì sao? tính mbn vẽ tia bt là phân giác của mbn tính số đo góc mbt,ybt vẽ tia bx là tia đối của tia bt so sánh mbx va ybn
Mọi ng ơi giisp mình với đnag gấp ạ
C1: thái độ và cách đối đãi của anh lái xe khi hành khách leen và xuống xe như thế nào? C2: vì sao anh lái xe được nhân vật tôi nể phục C3: học hỏi được j?
Cau" châu chấu nhảy lên gò nhiều cái lưng màu xanh ra phơi nắng " thuộc mẫu câu gì ? A ai làm gì ? , B ai thế nào? C ai là gì ? .
Vẽ chân dung :>..................
mình đang cần ý thứ 2. giúp mình với.
Chia sẻ về một cuốn sách mà mình yêu thích hoặc một cuốn sách đã làm thay đổi nhận thức, cuộc sống của bạn [ KHÔNG COPY MẠNG ]
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
