K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
TV
0
Các câu hỏi dưới đây có thể giống với câu hỏi trên
TT
1
17 tháng 11 2017
Program bai1;
uses crt;
var a: array[1..100] of integer;
n,i: integer;
begin
clrscr;
write('nhap n ='); readln(n);
for i:= 1 to n do
begin
write('nhap a[',i,'] ='); readln(a[i]);
end;
writeln('cac so chan la :');
for i:= 1 to n do
if a[i] mod 2 = 0 then write(a[i] :4);
writeln;
writeln('cac so le la :');
for i:= 1 to n do
if a[i] mod 2 <> 0 then write(a[i] :4);
writeln;
writeln('cac so chia het cho 3 la :');
for i:= 1 to n do
if a[i] mod 3 = 0 then write(a[i] :4 );
readln;
end.
TT
1
NL
1
2 tháng 11 2016
ukm,đây là ảnh mạng,rất nhìu ngừ có,nhưng ảnh của m chỉ có mk m có,mà người ta có cx ko dám up lên avt đâu nhỉ oOo_HằNg MoOn_oOo
24 tháng 12 2020
a) 973
b) 1011101
c) 58
e) 19039
f) 11111101
g) 43
k) 1EA9
l) 401
m) 111001101011
CD
0