Những câu hỏi liên quan
Nguyễn Hữu Kiệt
Xem chi tiết
H TC
Xem chi tiết
anime khắc nguyệt
3 tháng 3 2022 lúc 8:09

tk 
 

uses crt;

var st1:string;   

i,d:integer;

begin

clrscr;

write('Nhap xau:'); readln(st1);

d:=length(st1);

for i:=1 to d do

  if (st1[i]='a') and (st1[i+1]='b') and (st1[i+2]='c') then delete(st1,i,3);

writeln(st1);

readln;

end.

nguyễn an phát
Xem chi tiết
Nguyễn Lê Phước Thịnh
1 tháng 3 2021 lúc 17:27

uses crt;

var st1:string;   

i,d:integer;

begin

clrscr;

write('Nhap xau:'); readln(st1);

d:=length(st1);

for i:=1 to d do

  if (st1[i]='a') and (st1[i+1]='b') and (st1[i+2]='c') then delete(st1,i,3);

writeln(st1);

readln;

end.

Huân Trần
Xem chi tiết
Lê Thế Tài
4 tháng 1 2016 lúc 22:07

10 em                  ****cho mik nha

Huế
Xem chi tiết
Nguyễn Lê Phước Thịnh
7 tháng 3 2021 lúc 22:05

uses crt;

var st:string[30];

    i,d,dem,dem1:integer;

    ktu:char;

begin

clrscr;

write('Nhap cau:'); readln(st);

d:=length(st);

while st[1]=#32 do

  begin

     delete(st,1,1);

     d:=length(st);

  end;

while st[length(st)]=#32 do

  begin

     delete(st,length(st),1);

  end;

for i:=1 to length(st) do

 if (st[i]=#32) and (st[i+1]=#32) then delete(st,i,1);

dem:=0;

for i:=1 to length(st) do

  if st[i]=#32 then inc(dem);

writeln('So tu trong cau la: ',dem-1);

write('Nhap ki tu:'); readln(ktu);

dem1:=0;

for i:=1 to length(st) do

  if (st[i]=#32) and (st[i+1]=ktu) then inc(dem1);

writeln('Trong cau co ',dem1,' tu bat dau bang ki tu ',ktu);

readln;

end.

trang
Xem chi tiết
Phùng Kim Thanh
28 tháng 10 2021 lúc 20:55

C

Dân Chơi Đất Bắc=))))
28 tháng 10 2021 lúc 20:55

C

lạc lạc
28 tháng 10 2021 lúc 20:59

c. ..... 

Phùng Công Anh
Xem chi tiết
lê thiên trường
Xem chi tiết
Pham Trong Bach
Xem chi tiết
Cao Minh Tâm
4 tháng 9 2019 lúc 9:56

Đáp án B

Gọi A là biến cố “học sinh đăng ký Toán”

Gọi B là biến cố “học sinh đăng ký Lý”

A ∩ B  “học sinh đăng ký Toán, Lý”

A ∪  B là biến cố “học sinh có đăng ký học phụ đạo”

P ( A ∪ B ) = P ( A ) + P ( B ) - P ( A ∩ B ) = 38 50 + 30 50 - 25 50 = 43 50  

A ∪ B  là biến cố “học sinh không đăng ký môn nào cả”

P A ∪ B = 1 - Q A ∪ B = 8 50 = 0 , 14