Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

Những câu hỏi liên quan
Nguyễn Thị Hòa
Xem chi tiết
Anh Phạm
25 tháng 7 2021 lúc 20:51

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;

end;

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

else

begin

writeln(g,s);

writeln(g,tong);

end;

close(f);

close(g);

end.

Long Nhi
Xem chi tiết
Nguyễn Lê Phước Thịnh
23 tháng 4 2021 lúc 20:37

uses crt;

var a,b:string;

i,d:integer;

begin

clrscr;

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

d:=length(a);

b:=''

for i:=1 to d do 

  if a[i] in ['A'..'Z'] then b:=b+a[i];

writeln(b);

readln;

end.

Hong Trần
Xem chi tiết
Hong Trần
17 tháng 3 2021 lúc 18:04

Giúp mk với mai mk phải nộp r

Minh Lệ
17 tháng 3 2021 lúc 18:36

Program HOC24;

var s: string;

i,d: byte;

begin

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

d:=0;

for i:=1 to length(s) do if (s[i]='b') or (s[i]='B') then d:=d+1;

write('Co ',d,' ki tu B trong xau');

readln

end.

Nguyễn Vy
Xem chi tiết
Minh Lệ
10 tháng 5 2021 lúc 0:49

Program HOC24;

var s: string;

begin

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

write('Xau sau khi loc: ');

for i:=1 to length(s) do

if s[i] in ['A'..'z'] then write(s[i]);

readln

end.

Thanh Nhi Phạm
Xem chi tiết
Nguyễn Lê Phước Thịnh
23 tháng 4 2021 lúc 20:36

uses crt;

var st:string;

i,d,dem:integer;

ch:char;

begin

clrscr;

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

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

d:=length(st);

dem:=0;

while pos(ch,st)>0 do 

  begin

inc(dem);

delete(st,pos(ch,st),1);

end;

writeln(dem);

readln;

end.

Lily
Xem chi tiết
Phía sau một cô gái
23 tháng 3 2023 lúc 19:35

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)

Do Ngoc Thao My
Xem chi tiết
Do Ngoc Thao My
Xem chi tiết
Doan Thai
Xem chi tiết
Nguyễn thị tuyết nhung
Xem chi tiết
đăng hiếu
31 tháng 12 2021 lúc 10:55

chj check ib em ạ

Nguyễn Lê Phước Thịnh
31 tháng 12 2021 lúc 11:29

#include <bits/stdc++.h>

using namespace std;

string s;

int d,i,dem;

int main()

{

cin>>s;

d=s.length();

dem=0;

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

if (s[i]=='a') dem++;

cout<<dem;

return 0;

}