Cho trước một xâu S dài không quá 255 ký tự bao gồm chữ cái hoa, chữ cái thưởng và chữ số. Yêu cầu hãy viết chương trình để tinh trong xâu S có bao nhiều chữ cái hoa khác nhau, chữ cái thưởng khác n...

C

Chuu

29 tháng 3 2023

Cho trước một xâu S dài không quá 255 ký tự bao gồm chữ cái hoa, chữ cái thưởng và chữ số. Yêu cầu hãy viết chương trình để tinh trong xâu S có bao nhiều chữ cái hoa khác nhau, chữ cái thưởng khác nhau và bao nhiêu chữ số khác nhau? Input: tập XAU.INP chứa xâu S được ghi trên một dòng. Output: ghi vào tệp XAUOUT gồm 3 số nguyên trên một dòng (cách nhau bởi dấu cách) có thứ tự tương ứng; số...

Đọc tiếp

#Tin học lớp 8

0

TL

Trang Le

16 tháng 12 2022

Viết chương trình nhập sâu S không quá 255 kí tự, rồi xuất ra màn hình xâu chữ cái in hoa và chữ cái thường

#Tin học lớp 11

1

ML

Minh Lệ

17 tháng 12 2022

Program HOC24;

var s: string;

i: byte;

begin

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

write('Cac chu cai in hoa: ');

for i:=1 to length(s) do if s[i] in ['A'..'Z'] then write(s[i],' ');

writeln;

for i:=1 to length(s) do if s[i] in ['a'..'z'] then write(s[i],' ');

readln

end.

Đúng(0)

HT

Huyền Trang

16 tháng 3 2021

Viết chương trình đưa ra xâu S với các ký tự chữ cái trong xâu đã được chuyển thành chữ cái in hoa

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

16 tháng 3 2021

uses crt;

var s:string;

i,d:integer;

begin

clrscr;

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

d:=length(s);

for i:=1 to d do

s[i]:=upcase(s[i]);

writeln(s);

readln;

end.

Đúng(4)

VH

Vân Hồng

31 tháng 3 2021

Viết chương trình nhập xấu S. Đưa ra số kí tự chữ cái trong xâu (bao gồm cả chữ hoa và chữ thường)

#Tin học lớp 11

2

BA

Bùi Anh Tuấn

31 tháng 3 2021

Đúng(1)

NL

Nguyễn Lê Phước Thịnh

31 tháng 3 2021

uses crt;

var s:string;

dem,i,d:integer;

begin

clrscr;

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

d:=length(s);

dem:=0;

for i:=1 to d do

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

writeln(dem);

readln;

end.

Đúng(1)

KM

Khánh Mỹ

3 tháng 3 2021

Viết chương trình nhập từ bàn phím một xâu ký tự S. Xuất xâu đã nhập. Thông báo ra màn hình số lần xuất hiện của mỗi chữ cái tiếng Anh trong S (không phân biệt chữ hoa chữ thường )

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

3 tháng 3 2021

uses crt;

var st,s:string;

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

begin

clrscr;

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

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

d:=length(s);

for i:=1 to d do

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

dem:=1;

st[1]:=s[1];

for i:=1 to d do

begin

kt:=0;

for j:=1 to dem do

if s[i]=st[j] then kt:=1;

if kt=0 then

begin

inc(dem);

st[dem]:=s[i];

end;

for i:=1 to dem do

begin

dem1:=0;

for j:=1 to d do

if st[i]=s[j] then inc(dem1);

writeln(st[i],' xuat hien ',dem1,' lan');

end;

readln;

end.

Đúng(2)

NT

Nguyễn Thị Hòa

20 tháng 7 2021

Cho một xâu kí tự S không quá 255 kí tự gồm kí tự chữ cái và kí tự chữ số. Hãy in ra xâu vửa nhập và tính tổng các kí tự chữ số có trong xâu. Ngược lại nếu xâu chỉ gồm kí tự chữ cái hoặc chỉ gồm kí tự chữ số thì in ra “Sai yeu cau! Khong thuc hien!”.- Dữ liệu vào: Cho trong file XAU.INP gồm 1 dòng duy nhất là xâu S.- Dữ liệu ra: Ghi vào file XAU.OUT theo cấu trúc: Gồm 2 dòng:+ Dòng thứ...

Đọc tiếp

#Tin học lớp 11

1

AP

Anh Phạm

25 tháng 7 2021

uses crt;

var s:string;

i,tong,x,code:integer;

f,g:text;

k:boolean;

const fi='XAU.INP';

fo='XAU.OUT';

begin

k:=false;

assign(f,fi); reset(f);

assign(g,fo); rewrite(g);

readln(f,s);

tong:=0;

for i:=1 to length(s) do

begin

if s[i] in ['0'..'9'] then

begin

k:=true;

val(s[i],x,code);

tong:=tong+x;

x:=0;

cod:=0;

end;

if k=false then writeln(g,'Sai yeu cau')

else

begin

writeln(g,s);

writeln(g,tong);

end;

close(f);

close(g);

end.

Đúng(0)

KM

Khánh Mỹ

21 tháng 4 2021

Viết chương trình đọc dữ liệu từ tệp Input.txt chứa một xâu có độ dài không quá 125 ký tự .Cho biết số lần xuất hiện của mỗi chữ cái Tiếng Anh trong xâu đã đọc được ( không phân chữ hoa thường). Ghi kết quả ra tệp Output.txt

#Tin học lớp 11

1

NL

Nguyễn Lê Phước Thịnh

21 tháng 4 2021

const fi='input.txt';

fo='output.txt';

var f1,f2:text;

st:string[125];

a:array[1..125]of string;

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

begin

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

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

readln(f1,st);

d:=length(st);

dem:=1;

a[1]:=st[1];

for i:=1 to d do

begin

kt:=0;

for j:=1 to dem do

if a[j]=st[i] then kt:=1;

if kt=0 then

begin

inc(dem);

a[dem]:=st[i];

end;

for i:=1 to dem do

begin

dem1:=0;

for j:=1 to d do

if a[i]=st[j] then inc(dem1);

writeln(f2,a[i],' xuat hien ',dem1,' lan');

end;

close(f1);

close(f2);

end.

Đúng(0)

AN

Ánh Nguyệt Thiên Vĩ

11 tháng 4 2021

Cho biết xâu S gồm 5 kí tự. Trong đó kí tự cuối cùng là số lẻ, các kí tự còn lại là chữ cái. Viết chương trình cho biết có thể lập bao nhiêu xâu S trong đó một trong bốn kí tự đầu phải có chữ L in hoa.

#Tin học lớp 11

0

L

Lily

22 tháng 3 2023

Hãy nhập một xâu kí tự từ bàn phím gồm các chữ cái viết thường, các chữ số và các kí tự đặc biệt khác, cho biết xâu vừa nhập có bao nhiêu kí tự chữ cái, bao nhiêu kí tự chữ số, bao nhiêu kí tự...

Đọc tiếp

#Tin học lớp 10

1

PS

Phía sau một cô gái

23 tháng 3 2023

xau = input('Nhập xâu kí tự: ')

chu_cai, chu_so, ki_tu_khac = 0, 0, 0

for kt in xau:

if kt.isalpha():

chu_cai += 1

elif kt.isdigit():

chu_so += 1

else:

ki_tu_khac += 1

print('Số lượng kí tự chữ cái:', chu_cai)

print('Số lượng kí tự chữ số:', chu_so)

print('Số lượng kí tự khác:', ki_tu_khac)

Đúng(0)

NT

Nguyenthi Tien

21 tháng 3 2021

Viết chương trình nhập vào một xâu, gồm chữ cái và chữ số. Nhập vào 1 ký tự từ bàn phím kiểm tra xem ký tự đó có tồn tại trong xâu hay không?

#Tin học lớp 11

3

C

Cherry

21 tháng 3 2021

câu 1 Uses Crt;

Var St:String;

dem: Array[‘A’..’Z’] Of Byte

; i:Byte;

ch:Char;

Begin Write(‘Nhap xau St: ‘);

Readln(St);

{Khởi tạo mảng} For ch:=’A’ To ‘Z’ Do dem[ch]:=0;

{Duyệt xâu} For i:=1 To Length(St) Do If Upcase(St[i]) IN [‘A’..’Z’] Then Inc(dem[Upcase(St[i])]);

{Liệt kê các ký tự ra màn hình} For ch:=’A’ To ‘Z’ Do If dem[ch]>0 Then Writeln(ch,’ : ’,dem[ch]);

Readln;

Đúng(1)

TH

thiên hiền lê

21 tháng 3 2021

Hehe,con sâu

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP