Các câu hỏi tương tự
do you want ís my frend
vietnamese
Good morning . How are you? I want to play badminton .
Ca ban dich sang Viet nha
do cac ban cau tieng anh nay nha hello she I love
program xoa_ky_tu;uses crt;var x,y:string; i,j,dem,max: integer; a:char;BEGINclrscr;write(nhap xau x : );readln(x);y:x; for i:1 to length(x) dobeginj:i+1;repeatif x[i]x[j] then delete(x,j,1)elsej:j+1;until (jlength(x));end;writeln(xau sau khi loai bo ki tu giong nhau la :,x); max:0;a: ;for i:1 to length(x) dobegindem:0;for j:1 to length(y) doif x[i]y[j] thendem:dem+1;if demmax thenbeginmax:dem;a:x[i];end;end;writeln(ki tu ,a, xuat hien ,max, lan);readln;end.
Đọc tiếp
program xoa_ky_tu;
uses crt;
var x,y:string;
i,j,dem,max: integer;
a:char;
BEGIN
clrscr;
write('nhap xau x : ');
readln(x);
y:=x;
for i:=1 to length(x) do
begin
j:=i+1;
repeat
if x[i]=x[j] then delete(x,j,1)
else
j:=j+1;
until (j>length(x));
end;
writeln('xau sau khi loai bo ki tu giong nhau la :',x);
max:=0;
a:=' ';
for i:=1 to length(x) do
begin
dem:=0;
for j:=1 to length(y) do
if x[i]=y[j] then
dem:=dem+1;
if dem>max then
begin
max:=dem;
a:=x[i];
end;
end;
writeln('ki tu ',a,' xuat hien ',max,' lan');
readln;
end.
Find the number x, such that \(\overline{x08}̸̸⋮4\)
Find x, such that \(4\times x=16\div x\)?
Good evening everyone. Does anyone want to make friends with me?
70 + 60 + 70 - 200 =
Chọn số thay thế dấu chấm hỏi.
 |
ai đúng mình tick
cau do ne :
cau 1 : benh j bac si phai bo tay ?
cau 2 : lich nao dai nhat ?
cau 3 quan rong nhat la quan j ?
i tick minh minh tick lai nha .