Ký tự tiếp theo trong dãy sau đây là ký tự nào: A , C , F , J , O , ?
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.
Ký tự tiếp theo của dãy A,D,G,J là:
đáp án: M
học tốt!!!
Câu đố IQ số 9: Ký tự tiếp theo của dãy ký tự A, D, G, J là gì ?
- Chữ "M"-
Ký tự T I N H O C có 6 chữ cái
Ta có :
2016 : 6 = 336 => chữ thứ 2016 là chữ C
3000 : 6 = 500 => chữ thứ 3000 là chữ C
k mk nha !
mình nghĩ câu trả lời của TXT Channel Funfun không hiệu quả và logic cho lắm!
mình cần cách trình bày rõ ràng hơn!
Var st:string;
i,dem:integer;
Begin
Write('Nhap xau ky tu ');readln(st);
For i:=1 to length(st) do
If st[i] = 'a' then dem:=dem+1;
Write('So ky tu a co trong xau la ',dem);
Readln;
End.
Program HOC24;
var s: string;
tg,d,max,i: byte;
code: integer;
begin
write('Nhap xau : '); readln(s);
// cau a
for i:=1 to length(s) do if s[i] in ['a'..'z'] then write(upcase(s[i]));
//------
writeln;
//-cau b
for i:=length(s) downto 1 do if s[i] in ['0'..'9'] then write(s[i]);
//------
writeln;
//---cau c
d:=0;
for i:= 1 to length(s) do
if s[i] in ['0'..'9'] then
begin
val(s[i],tg,code);
if tg>max then max:=tg;
d:=d+1;
end;
if d=0 then write('Khong co chu so trong day') else write('Chu so lon nhat la : ',max);
readln
end.
uses crt;
var st,st1:string;
d,i,d1,max,x,y:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
writeln('Day cac ki tu thuong doi sang chu hoa la: ');
for i:=1 to d do
if st[i] in ['a'..'z'] then write(upcase(st[i]):4);
st1:='';
for i:=1 to d do
if st[i] in ['0'..'9'] then st1:=st1+st[i];
d1:=length(st1);
for i:=d1 downto 1 do
write(st1[i]:4);
writeln;
max:=0;
for i:=1 to d1 do
begin
val(st1[i],x,y);
if max<x then max:=x;
end;
writeln('Chu so lon nhat trong xau la: ',max);
readln;
end.
U
Ký tự tiếp theo trong dãy sau đây là ký tự nào: A , C , F , J , O , U