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.

15 tháng 8 2018

Đáp án A

24 tháng 5 2022

program bai1;
uses crt;
var i:integer;
s,s1:string;
begin
  clrscr;
  write('nhap S:');readln(s);
  while pos('C',s)<>0 do
  begin
    insert('LOP11A',s,pos('C',s));
    delete(s,pos('C',s),1);
  end;
  writeln('xau sau khi bien doi la: ',s);
  writeln('do dai cua xau tren la: ',length(s));
  write('nhap s1:');readln(s1);
  if s1[1]=s[1] then writeln('ki tu dau cua hai xau trung nhau')
  else writeln('ki tu dau cua hai xau khong trung nhau');
  readln;
end.

uses crt;

var s:string;

i,d,dem:integer;

begin 

clrscr;

write('Nhap chuoi S:'); readln(s);

d:=length(s);

writeln('Trong chuoi ',s,' co ',d,' ki tu');

writeln('Chuoi dao cua chuoi ',s,' la: ');

for i:=d downto 1 do 

  write(s[i]:4);

writeln;

dem:=0;

for i:=1 to d do 

  if s[i] in ['0'..'9'] then inc(dem);

writeln('So chu so trong xau la: ',dem);

readln;

end. 

15 tháng 1 2021

Bạn ơi cho mình hỏi sao bạn còn thiếu chỗ câu c hay sao?Hình như bạn chưa làm câu c  đúng không ạ.

uses crt;

var s:string;

i,d,dem,dem1,kt:integer;

begin

clrscr;

write('Nhap xau S:'); readln(s);

d:=length(s);

dem:=0;

for i:=1 to d do 

  if st[i] in ['0'..'9'] then inc(dem);

writeln('So ki tu la chu so la: ',dem);

dem1:=0;

for i:=1 to d do 

  if (st[i] in ['A'..'Z']) or (st[i] in ['a'..'z']) then inc(dem1);

writeln('So ki tu la chu cai la: ',dem1);

write('Xau sau khi xoa ki tu trang la: ');

for i:=1 to d do 

if st[i]<>#32 then write(st[i]);

writeln;

kt:=0;

for i:=1 to d do 

 if st[i]<>st[d-i+1] then kt:=1;

if kt=0 then writeln('Xau doi xung')

else writeln('Xau khong doi xung');

readln;

end.

điền các từ sau vào chỗ trống (phím Enter, Dòng, Trang văn bản, dấu xuống dòng, một đường ngang, đoạn và trang, Kí tự, các kí tự gõ liền nhau, Đoạn văn bản, Trang)Các thành phần của văn bản:-Văn bản có các thành phần cơ bản: Kí tự, từ, câu, dòng, ……… (1) ………….-Kí tự: là con chữ, số, kí hiệu, ..... (2).......... là thành phần cơ bản nhất của văn bản. Kí tự trống là dấu...
Đọc tiếp

điền các từ sau vào chỗ trống (phím Enter, Dòng, Trang văn bản, dấu xuống dòng, một đường ngang, đoạn và trang, Kí tự, các kí tự gõ liền nhau, Đoạn văn bản, Trang)

Các thành phần của văn bản:

-Văn bản có các thành phần cơ bản: Kí tự, từ, câu, dòng, ……… (1) ………….

-Kí tự: là con chữ, số, kí hiệu, ..... (2).......... là thành phần cơ bản nhất của văn bản. Kí tự trống là dấu cách.

Ví dụ: a, b, c, #, &, 4, 6 ...

-Từ soạn thảo: Một từ soạn thảo là ………(3)………….. Các từ soạn thảo thường được cách nhau bởi dấu cách, …………(4)…………… hoặc một dấu tách câu (dấu phẩy (,), dấu chấm (.), dấu hai chấm (:), dấu chấm than (!),…).

Ví dụ: Từ “học” có 3 kí tự.

-………(5)……….: là tập hợp các kí tự nằm trên cùng ……………(6) …………… từ lề trái sang lề phải của một trang.

-…………(7)……………….: Bao gồm một số câu và được kết thúc bằng dấu xuống dòng. Khi gõ văn bản, …………(8)………….. dùng để kết thúc một đoạn văn bản và xuống dòng.

-…………(9)…..: Phần văn bản trên một trang in gọi là ………(10)…………..

1
13 tháng 12 2021

B nha bạn !

6 tháng 4 2021

Phát biểu nào dưới đây là sai?

A.    Xâu là một dãy các kí tự trong bảng mã ASCII. Kiểu xâu là một kiểu dữ liệu có cấu trúc.

B.     Có thể xem mỗi xâu có cấu trúc giống như một mảng một chiều mà mỗi phần tử của  mảng là một kí tự trong bảng mã ASCII, được đánh chỉ số từ 1.

C.    Số lượng kí tự trong một xâu chính là độ dài của xâu.

D.    Các phép toán thao tác với xâu tương tự như các phép toán thao tác với mảng.  

6 tháng 4 2021

Đáp án: A

16 tháng 3 2021

Program HOC24;

var s: string;

x: char;

d: byte;

begin

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

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

d:=0;

for i:=1 to length(s) do if s[i]=x then d:=d+1;

if d=0 then write('Ki tu do khong xuat hien trong xau') else write('Ki tu do xuat hien trong xau');

readln

end.

Cô ơi, cô chưa khai báo biến i thưa cô