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
Trà my
Xem chi tiết
Nguyễn Lê Phước Thịnh
24 tháng 12 2022 lúc 13:47

uses crt;

var st:string;

dem,i,d:integer;

begin

clrscr;

readln(st);

dem:=0;

d:=length(st);

for i:=1 to d do

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

write(dem);

readln;

end.

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
30 tháng 4 2017 lúc 16:06

Var a: string;

  i, Dem: integer;

Begin

 writeln(‘nhap xau:’);

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If a[i] =’ ‘ then

  Dem:= Dem+1;

 Writeln(Dem);

 Readln

End.

Nông trang
Xem chi tiết
Bùi Anh Tuấn
28 tháng 4 2021 lúc 19:37

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
25 tháng 2 2018 lúc 10:40

Var a: string;

 i, Dem: integer;

Begin

 writeln(‘nhap xau:’);

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If (‘a’<=a[i]) and (a[i]<=’z’)

  Dem:= Dem+1;

 Writeln(Dem);

 Readln

End.

Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
20 tháng 8 2019 lúc 7:45

Var a: string;

  i, Dem: integer;

Begin

 writeln(‘nhap xau:’);

 Readln(a);

 Dem:=0;

 For i:=1 to length(a) do

 If (‘A’<=a[i]) and (a[i]<=’Z’) then

  Dem:= Dem+1;

 Writeln(Dem);

 Readln

End.

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;

}

Nguyễn Nhật Lệ
Xem chi tiết
Nguyễn Lê Phước Thịnh
14 tháng 4 2021 lúc 12:58

uses crt;

var st:string;

i,d,dem:integer;

begin

clrscr;

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

d:=length(st);

dem:=0;

for i:=1 to d do 

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

writeln(dem);

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.

Nguyen Dao
Xem chi tiết
Phía sau một cô gái
23 tháng 2 2023 lúc 21:58

string = input("Nhập vào một xâu kí tự: ")

count = string.count('tiền')

print('Xâu kí tự có ', count, 'từ "tiền"')