Câu1: " Viết Chương Trình Nhập Vào Xâu. Thực Hiện Các Câu Lệnh Sau :

HOC24

Lớp học Học bài Hỏi bài Giải bài tập Đề thi ĐGNL Tin tức Cuộc thi vui Khen thưởng
  • Tìm kiếm câu trả lời Tìm kiếm câu trả lời cho câu hỏi của bạn
Đóng Đăng nhập Đăng ký

Lớp học

  • Lớp 12
  • Lớp 11
  • Lớp 10
  • Lớp 9
  • Lớp 8
  • Lớp 7
  • Lớp 6
  • Lớp 5
  • Lớp 4
  • Lớp 3
  • Lớp 2
  • Lớp 1

Môn học

  • Toán
  • Vật lý
  • Hóa học
  • Sinh học
  • Ngữ văn
  • Tiếng anh
  • Lịch sử
  • Địa lý
  • Tin học
  • Công nghệ
  • Giáo dục công dân
  • Tiếng anh thí điểm
  • Đạo đức
  • Tự nhiên và xã hội
  • Khoa học
  • Lịch sử và Địa lý
  • Tiếng việt
  • Khoa học tự nhiên
  • Hoạt động trải nghiệm
  • Hoạt động trải nghiệm, hướng nghiệp
  • Giáo dục kinh tế và pháp luật

Chủ đề / Chương

Bài học

HOC24

Khách Khách vãng lai Đăng nhập Đăng ký Khám phá Hỏi đáp Đề thi Tin tức Cuộc thi vui Khen thưởng
  • Tất cả
  • Toán
  • Vật lý
  • Hóa học
  • Sinh học
  • Ngữ văn
  • Tiếng anh
  • Lịch sử
  • Địa lý
  • Tin học
  • Công nghệ
  • Giáo dục công dân
  • Tiếng anh thí điểm
  • Hoạt động trải nghiệm, hướng nghiệp
  • Giáo dục kinh tế và pháp luật
Hãy tham gia nhóm Học sinh Hoc24OLM Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Câu hỏi

Hủy Xác nhận phù hợp Chọn lớp Tất cả Lớp 12 Lớp 11 Lớp 10 Lớp 9 Lớp 8 Lớp 7 Lớp 6 Lớp 5 Lớp 4 Lớp 3 Lớp 2 Lớp 1 Môn học Toán Vật lý Hóa học Sinh học Ngữ văn Tiếng anh Lịch sử Địa lý Tin học Công nghệ Giáo dục công dân Tiếng anh thí điểm Đạo đức Tự nhiên và xã hội Khoa học Lịch sử và Địa lý Tiếng việt Khoa học tự nhiên Hoạt động trải nghiệm Hoạt động trải nghiệm, hướng nghiệp Giáo dục kinh tế và pháp luật Mới nhất Mới nhất Chưa trả lời Câu hỏi hay Dương Thị Bắc Đông Dương Thị Bắc Đông 7 tháng 3 2017 lúc 17:03 Câu1: Viết chương trình nhập vào xâu. Thực hiện các câu lệnh sau : - Xóa dấu cách thừa - In hoa chữ cái đầu tiên của mỗi từ - Cho biết vị trí của kí tự cuối ở số thứ tự thứ mấy...Đọc tiếp

Câu1: " Viết chương trình nhập vào xâu. Thực hiện các câu lệnh sau : - Xóa dấu cách thừa - In hoa chữ cái đầu tiên của mỗi từ - Cho biết vị trí của kí tự cuối ở số thứ tự thứ mấy - Xóa đi từ cuối cùng của xâu Rồi đưa kết quả ra màn hình. Câu 2: " Viết chương trình tạo mảng gồm N số nguyên có giá trị tuyệt đối <= 200 M số nguyên có giá trị tuyệt đối <= 300 Tính trung bình cộng của N số nguyên và trung bình cộng của M số nguyên So sánh Trung bình cộng của N số và M số và đưa kết quả ra màn hình. ------> Giúp em đi . Cần gấp Kiểm Tra 1 Tiết <----------

Lớp 11 Tin học Bài 12: Kiểu xâu Những câu hỏi liên quan NgocTuan
  • NgocTuan
23 tháng 1 2022 lúc 14:10 Bài 2. Viết chương trình nhập vào một xâu bất kỳ. In ra màn hình xâu đó sau khi đã xóa hếtký tự trắng dư thừa. Ký tự trắng dư thừa (hay còn gọi là dấu cách, ký tự trống) là kýtự trắng xuất hiện ở trước từ đầu tiên của xâu, sau từ cuối cùng của xâu và giữa cáctừ cách nhau nhiều hơn 1 ký tự trắng.Ví dụ: Giả sử * là ký tự trắng.Cho xâu: ’**xin***chao**’. > Xâu sau khi được xử lý ’xin*chao’Gợi ý:Kiểm tra phần tử trong xâu có phải là ký tự trắng hay không? Nếu đúng thì xóa ký tự trắng đócho đến kh...Đọc tiếp

Bài 2. Viết chương trình nhập vào một xâu bất kỳ. In ra màn hình xâu đó sau khi đã xóa hếtký tự trắng dư thừa. Ký tự trắng dư thừa (hay còn gọi là dấu cách, ký tự trống) là kýtự trắng xuất hiện ở trước từ đầu tiên của xâu, sau từ cuối cùng của xâu và giữa cáctừ cách nhau nhiều hơn 1 ký tự trắng.Ví dụ: Giả sử * là ký tự trắng.Cho xâu: ’**xin***chao**’. =&gt; Xâu sau khi được xử lý ’xin*chao’Gợi ý:Kiểm tra phần tử trong xâu có phải là ký tự trắng hay không? Nếu đúng thì xóa ký tự trắng đócho đến khi không còn ký tự trắng ở đầu xâu.Kiểm tra từ đầu đến cuối xâu, nếu có 2 ký tự trắng liên tiếp =&gt; Xóa đi 1 ký tự trắng, thự hiệncông việc xóa cho đến khi giữa các từ trong xâu chỉ cách nhau 1 ký tự trắng.Sau khi xử lý các ký tự trắng dư thừa ở đầu xâu, giữa xâu. Ta xử lý tiếp ký tự trắng dư thừa ởcuối xâu bằng cách kiểm tra ký tự cuối cùng có phải là ký tự trắng hay không. Nếu đúng thì xóacho đến khi ký tự cuối cùng của xâu không phải là ký tự trắng.B1: Khai báo.B2: Nhập xâu bất kỳ.B3: Xoá ký tự trắng dư thừaB3.1: Xoá ký tự trắng dư thừa xuất hiện ở đầu tiên của xâu (nếu có).Chừng nào ký tự đầu tiên trong xâu là ký tự trắng =&gt; xoá ký tự trắng đó cho đến khi đầu xâukhông phải là ký tự trắng.B3.2: Xoá ký tự trắng dư thừa cuối cùng của xâu (nếu có).Chừng nào trong xâu xuất hiện 2 ký tự trắng trong xâu =&gt; xoá đi 1 ký tự trắng dư thừa.B3.3: Xoá ký tự trắng dư thừa giữa các từ (nếu có).Chừng nào ký tự cuối cùng là ký tự trắng =&gt; Xoá đi ký tự đó.B4: In ra kết quả

Xem chi tiết Lớp 8 Tin học 1 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 23 tháng 1 2022 lúc 20:08

#include <bits/stdc++.h>

using namespace std;

string st;

int d,i;

int main()

{

getline(cin,st);

d=st.length();

for (i=0; i<=d-1; i++)

if ((st[i]==' ') and (st[i+1]=' ')) st.erase(i,1);

cout<<st;

return 0;

}

Đúng 0 Bình luận (0) Khách Gửi Hủy LINH VU HA NGOC
  • LINH VU HA NGOC
28 tháng 2 2022 lúc 14:45 Viết chương trình nhập 1 xâu từ bàn phím, đưa ra:  a. Độ dài xâu.  b. Xâu đã xóa đi 1 ký tự đầu.  c. Xâu đã xóa đi 2 ký tự cuối.  d. Xâu đã xóa đi 1 ký tự giữa.  e. Xâu đã in hoa.  f. Vị trí của khoảng trắng đầu tiên.  g. Đếm số ký tự ‘a’ có trong xâu.  Đọc tiếp

Viết chương trình nhập 1 xâu từ bàn phím, đưa ra: 

a. Độ dài xâu.  

b. Xâu đã xóa đi 1 ký tự đầu.  

c. Xâu đã xóa đi 2 ký tự cuối.  

d. Xâu đã xóa đi 1 ký tự giữa.  

e. Xâu đã in hoa.  

f. Vị trí của khoảng trắng đầu tiên.  

g. Đếm số ký tự ‘a’ có trong xâu. 

 

Xem chi tiết Lớp 11 Tin học Bài 12: Kiểu xâu 0 0 Khách Gửi Hủy Nguyễn Thị Ngọc Minh
  • Nguyễn Thị Ngọc Minh
29 tháng 1 2021 lúc 21:13 Viết 1 chương trình pascal thực hiện - Nhập vài 1 xâu gồm có dấu cách và kí tự không hoa - BỎ các dấu cách thừa ở đầu, cuối, giữa - Viết lại xâu theo cách viết tên riêng - Đếm xem xâu có bao nhiêu từ... Giúp mình với, mình đang cần gấp!!! Xem chi tiết Lớp 11 Tin học Bài 12: Kiểu xâu 1 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 29 tháng 1 2021 lúc 22:18

uses crt;

var st:string;   

d,i,dem:integer;

begin

clrscr;

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

d:=length(st);

while st[1]=#32 do 

begin     

delete(st,1,1);     

d:=length(st); 

end;

while st[d]=#32 do 

begin     

delete(st,d,1);     

d:=length(st); 

end;

for i:=1 to d do 

begin     

while (st[i]=#32) and (st[i+1]=#32) do       

begin         

delete(st,i,1);         

d:=length(st);       

end; 

end;

st[1]:=upcase(st[1]);

for i:=1 to d do 

if st[i]=#32 then st[i+1]:=upcase(st[i+1]);

writeln('Ten cua ban sau khi viet dung la: ',st);

dem:=1;

for i:=1 to d do 

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

writeln('So tu cua xau la: ',dem);

readln;

end.

Đúng 2 Bình luận (0) Khách Gửi Hủy luc lun
  • luc lun
9 tháng 12 2021 lúc 20:52

viết chương trình nhập 1 xâu từ bàn phím. a) Hãy xóa tất cả các cách ký tự ở đầu xâu b) Hãy xóa tất cả các cách ký tự ở đầu xâu c) Hãy xóa tất cả các cách ký tự ở giữa các từ (giữa các từ chỉ có 1 dấu cách ) d) Đếm các chữ cái có trong xâu e) Đếm các chữ số ở xâu chuỗi. Trong màn hình kết quả

Xem chi tiết Lớp 11 Tin học Bài 12: Kiểu xâu 1 1 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 9 tháng 12 2021 lúc 23:09

#include <bits/stdc++.h>using namespace std;int d,i,d1;string st;int main(){    getline(cin,st);    d=st.length();    while (st[0]==32)    {       st.erase(0,1);    }    while (st[d-1]==32)    {        st.erase(d-1,1);    }    d1=st.length();    for (i=0; i<d1; i++)        if ((st[i]==32) && st[i+1]==32)        {            st.erase(i,1);            i--;        }    cout<<st;    return 0;}

 

Đúng 0 Bình luận (1) Khách Gửi Hủy Linh Tran
  • Linh Tran
31 tháng 3 2021 lúc 16:56

Viết chương trình nhập vào một xâu hiển thị lên màn hình một xâu sau khi đã xóa xâu ở vị trí số 3 xóa 4 kí tự .

Xem chi tiết Lớp 11 Tin học 2 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 31 tháng 3 2021 lúc 18:37

uses crt;

var st:string;

begin

clrscr;

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

delete(st,3,4);

writeln('Xau sau khi xoa la: ',st);

readln;

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Bùi Anh Tuấn Bùi Anh Tuấn 31 tháng 3 2021 lúc 19:53

Đúng 0 Bình luận (0) Khách Gửi Hủy Nguyễn Thảo Vy
  • Nguyễn Thảo Vy
30 tháng 3 2023 lúc 18:29

1. Cho xâu S nhập từ bàn phím. Viết chương trình xóa các kí tự dư thừa trong xâu và biến các kí tự trong xâu thành chữ hoa.

2. Cho xâu s nhập từ bàn phím.Định dạng xâu theo kiểu tên người VD Truong Vinh Ky

Xem chi tiết Lớp 11 Tin học Câu hỏi của OLM 0 0 Khách Gửi Hủy Hakai
  • Hakai
26 tháng 2 2021 lúc 9:28

viết chương trình nhập vào một xâu, thực hiện

1) in ra màn hình mỗi từ trên mỗi dòng

2) xóa các kí tự trống trong xâu

3) in hoa xâu vừa nhập

4) in xâu đảo ngược 

Ai giải giúp em với ạ

Xem chi tiết Lớp 11 Tin học Bài 12: Kiểu xâu 3 1 Khách Gửi Hủy Minh Lệ Minh Lệ 26 tháng 2 2021 lúc 17:39

Bài 3:

Program HOC24;

var s: string;

i: byte;

begin

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

for i:=1 to length(s) do s[i]:=upcase(s[i]);

write('Xau sau khi in hoa : ',s);

readln

end.

Bài 4:

Program HOC24;

var s: string;

i: byte;

begin

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

write('Xau sau khi dao nguoc: ');

for i:=length(s) downto 1 do write(s[i]);

readln

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Minh Lệ Minh Lệ 26 tháng 2 2021 lúc 17:39

Bài 1:

Program HOC24;

var s: string;

i: byte;

begin

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

while s[1]=#32 do delete(s,1,1);

while pos(#32#32,s)<>0 do delete(s,pos(#32#32,s),1);

while s[length(s)]=#32 do delete(s,length(s),1);

for i:=1 to length(s) do

if s[i]=#32 then writeln(s[i]) else write(s[i]);

writeln;

readln

end.

Bài 2:

Program HOC24;

var s: string;

i: byte;

begin

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

while s[1]=#32 do delete(s,1,1);

while pos(#32,s)<>0 do delete(s,pos(#32,s),1);

while s[length(s)]=#32 do delete(s,length(s),1);

writeln('Xau sau khi xoa ki tu trong: ',s);

readln

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 26 tháng 2 2021 lúc 21:29

Bài 4: 

uses crt;

var st:string;

d,i:integer;

begin

clrscr;

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

d:=length(st);

for i:=d downto 1 do 

  write(st[i]);

readln;

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Phan thị lê na
  • Phan thị lê na
6 tháng 4 2021 lúc 7:12

1 Viết chương trình nhập mạng một chiều n tính và in ra màn hình tổng số lẻ 2 viết chương trình nhập vào một xâu từ văn phím viết chương trình chuẩn hóa xâu bằng cách xóa các ký tự trống ở đâu xâu và cuối xâu 3 Viết các thao tác và lần tương ứng cần thực hiện để đọc một giá trị từ tệp ‘ DL.TXT ‘ Ghi giá trị vừa đọc vào tệp ‘KQ.TXT’ Giúp mình với ạ

Xem chi tiết Lớp 11 Tin học 3 1 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 6 tháng 4 2021 lúc 12:40

1:

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do 

  if a[i] mod 2<>0 then t:=t+a[i];

writeln(t);

readln;

end.

Đúng 1 Bình luận (0) Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 6 tháng 4 2021 lúc 12:42

3:

const fi='dl.txt'

fo='kq.txt'

var f1,f2:text;

a:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,a);

writeln(f2,a);

close(f1);

close(f2);

end.

Đúng 1 Bình luận (0) Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 6 tháng 4 2021 lúc 12:41

2:

uses crt;

var st:string;

d:integer;

begin

clrscr;

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

d:=length(st);

while st[1]=#32 do 

  begin

delete(st,1,1);

d:=length(st);

end;

while st[d]=#32 do 

  begin

delete(st,d,1);

d:=length(st);

end;

writeln(st);

readln;

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Khánh Mỹ
  • Khánh Mỹ
3 tháng 3 2021 lúc 14:19

Viết chương trình nhập vào một xâu S có độ dài không quá 125 ký tự từ bàn phím. Xuất xâu đã nhập. Thực hiện xóa hết các dấu cách có trong xâu S. Xuất xâu S đã xóa các dấu cách ra màn hình

 

Xem chi tiết Lớp 11 Tin học Bài 12: Kiểu xâu 1 0 Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 3 tháng 3 2021 lúc 19:45

uses crt;

var st:string;

i,d:integer;

begin

clrscr;

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

d:=length(st);

writeln('Xau vua nhap la: ',st);

for i:=1 to d do 

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

writeln('Xau moi la: ',st);

readln;

end.

Đúng 2 Bình luận (0) Khách Gửi Hủy minh
  • minh
28 tháng 4 2021 lúc 12:18

Nhập vào từ bàn phím một xâu kí tự S. Viết chương trình thực hiện xóa các kí tự 'a' có trong xâu S. Sau đó hiển thị kết quả xâu S sau khi đã xóa kí tự 'a' ra màn hình

Xem chi tiết Lớp 11 Tin học 2 0 Khách Gửi Hủy Minh Lệ Minh Lệ 28 tháng 4 2021 lúc 13:39

Program HOC24;

var s: string;

i: byte;

begin

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

for i:=1 to length(s) do if s[i]<>'a' then write(s[i]);

readln

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy Nguyễn Lê Phước Thịnh Nguyễn Lê Phước Thịnh CTV 28 tháng 4 2021 lúc 19:12

uses crt;

var st:string;

i,d:integer;

begin

clrscr;

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

d:=length(st);

for i:=1 to d do 

 if st[i]='a' then delete(st,i,1);

writeln(st);

readln;

end.

Đúng 0 Bình luận (0) Khách Gửi Hủy

Khoá học trên OLM (olm.vn)

  • Toán lớp 11 (Kết nối tri thức với cuộc sống)
  • Toán lớp 11 (Cánh Diều)
  • Toán lớp 11 (Chân trời sáng tạo)
  • Ngữ văn lớp 11
  • Tiếng Anh lớp 11 (i-Learn Smart World)
  • Tiếng Anh lớp 11 (Global Success)
  • Vật lý lớp 11 (Kết nối tri thức với cuộc sống)
  • Vật lý lớp 11 (Cánh diều)
  • Hoá học lớp 11 (Kết nối tri thức với cuộc sống)
  • Hoá học lớp 11 (Cánh diều)
  • Sinh học lớp 11 (Kết nối tri thức với cuộc sống)
  • Sinh học lớp 11 (Cánh diều)
  • Lịch sử lớp 11 (Kết nối tri thức với cuộc sống)
  • Lịch sử lớp 11 (Cánh diều)
  • Địa lý lớp 11 (Kết nối tri thức với cuộc sống)
  • Địa lý lớp 11 (Cánh diều)
  • Giáo dục kinh tế và pháp luật lớp 11 (Kết nối tri thức với cuộc sống)
  • Tin học lớp 11 (Kết nối tri thức với cuộc sống)
  • Công nghệ lớp 11 (Kết nối tri thức với cuộc sống)

Từ khóa » Xóa Các Ký Tự Trắng Dư Thừa Trong Xâu Pascal