phân tích dãy sau ra 1 dãy bit:HA NOI
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.
Những câu hỏi liên quan
AH
Akai Haruma
Giáo viên
27 tháng 6 2021
Lời giải:
Coi $x$ là số hạng thứ 2014. Bạn nhớ công thức tìm số số hạng như sau:
$(x-2):2+1=2014$
Như vậy đương nhiên số hạng thứ 2014 là:
$x=(2014-1)\times 2+2$
Số 1 có ý nghĩa như vậy.
CM
8 tháng 6 2019
+ Ô chữ N: Quy đồng mẫu số với mẫu số chung bằng 10.
Do đó phân số tiếp theo cần điền là 
+ Ô chữ H: Quy đồng mẫu số với mẫu số chung bằng 12.
Do đó phân số tiếp theo cần điền là 
+ Ô chữ Y: Quy đồng mẫu số với mẫu số chung bằng 40.
Do đó phân số tiếp theo cần điền là 
+ Ô chữ O: Quy đồng mẫu số với mẫu số chung bằng 20.
Do đó phân số tiếp theo cần điền là 
+ Ô chữ M: Quy đồng mẫu số với mẫu số chung bằng 12.
Do đó phân số tiếp theo cần điền là 
+ Ô chữ S: Quy đồng mẫu số với mẫu số chung bằng 18.
Do đó phân số tiếp theo cần điền là 
+ Ô chữ A: Quy đồng mẫu số với mẫu số chung bằng 14.
Do đó phân số tiếp theo cần điền là 
+ Ô chữ I: Quy đồng mẫu số với mẫu số chung bằng 18.
Do đó phân số tiếp theo cần điền là 
Vậy điền các chữ cái tương ứng với các kết quả ta được:
Đó là hai địa danh HỘI AN và MỸ SƠN của Viêt Nam được UNESCO công nhân là di sản văn hóa thế giới vào năm 1999.
KV
10 tháng 5 2023
Var a:array:[1..1000] of integer;
i,n,max:integer;
Begin
Write('Nhap so luong phan tu n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap diem thu ',i,' = ');readln(a[i]);
End;
Write('Cac diem vua nhap la: ');
For i:=1 to n do
Write(a[i]:8);
writeln;
max:=a[1];
For i:=2 to n do
if a[i] > max then max:=a[i];
write('So lon nhat la ',max);
Readln
End.
11 tháng 4 2021
program timtich;
uses crt;
var i,n:integer;
tich:longint;
a:array[1..100]of integer;
begin
clrscr;
write('nhap so n:');readln(n);
for i:=1 to n do
begin
write('nhap phan tu a[',i,']:');readln(a[i]);
end;
for i:=1 to n do
write(a[i]:4);
tich:=1;
writeln;
for i:=1 to n do
if a[i] mod 2=0 then tich:=tich*a[i];
writeln('tich ca phan tu chan cua mang la:',tich);
readln;
end.
program timtong;
uses crt;
var i,n:integer;
tong:longint;
a:array[1..100]of integer;
begin
clrscr;
write('nhap so n:');readln(n);
for i:=1 to n do
begin
write('nhap phan tu a[',i,']:');readln(a[i]);
end;
for i:=1 to n do
write(a[i]:4);
tong:=0;
writeln;
for i:=1 to n do
if a[i] mod 2=0 then tong:=tong+a[i];
writeln('tong cac phan tu chan cua mang la:',tong);
tong:=0;
writeln;
for i:=1 to n do
if a[i] mod 2=1 then tong:=tong+a[i];
writeln('tong cac phan tu le cua mang la:',tong);
readln;
end.
11 tháng 4 2021
Bài 1:
uses crt;
var a:array[1..100]of integer;
i,n,s:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
s:=1;
for i:=1 to n do
if a[i] mod 2=0 then s:=s*a[i];
writeln(s);
readln;
end.
KV
3 tháng 5 2023
1)
Var array:[1..1000] of integer;
i,n,t:integer;
Begin
Write('n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(a[i]);
End;
For i:=1 to n do
If a[i] > a[i+1] then
Begin
t:=a[i];
a[i]:=a[i+1];
a[i+1]:=t;
End;
Write('Sap xep tang dan ');
For i:=1 to n do write(a[i]:8);
Readln
End.
KV
3 tháng 5 2023
2)
Var array:[1..1000] of integer;
i,n,t:integer;
Begin
Write('n = ');readln(n);
For i:=1 to n do
Begin
Write('Nhap so thu ',i,' = ');readln(a[i]);
End;
For i:=1 to n do
If a[i] < a[i+1] then
Begin
t:=a[i];
a[i]:=a[i+1];
a[i+1]:=t;
End;
Write('Sap xep giam dan ');
For i:=1 to n do write(a[i]:8);
Readln
End.
20 tháng 4 2022
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do write(a[i]:4);
writeln;
t:=0;
for i:=1 to n do
if a[i]>0 then t:=t+a[i];
writeln(t);
readln;
end.
0T
1
31 tháng 3 2022
uses crt;
var a:array[1..100]of integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do write(a[i]:4);
readln;
end.
