Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Dang Thao Nhi
assign Câu 3 (7,0 điểm): Đếm ký tự Cho một văn bản gồm N dòng. Các ký tự được lấy từ tập các chữ cái và chữ số. Yêu cầu: Tìm số lượng ký tự của dòng ngắn nhất, số lượng ký tự của dòng dài nhất và số lượng ký tự của văn bản. Dữ liệu vào: Cho trong file văn bản CAU3.INP, có cấu trúc như sau: - Dòng 1: Ghi số nguyên dương N là số dòng của văn bản (1 ≤ N ≤ 100). - N dòng tiếp theo: Mỗi dòng ghi một xâu gồm L ký tự (0 < L < 255). Dữ liệu ra: Ghi ra file văn bản CAU3.OUT, theo cấu trúc như sau...
Đọc tiếp

Những câu hỏi liên quan
dũng
Xem chi tiết
havdgncna
Xem chi tiết
Nguyễn Lê Phước Thịnh
10 tháng 5 2022 lúc 23:27

uses crt;

var st:string;

i,d:integer;

begin

clrscr;

readln(st);

d:=length(st);

for i:=1 to d do

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

writeln;

for i:=1 to d do 

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

readln;

end.

M r . V ô D a n h
Xem chi tiết
Minh Lệ
9 tháng 4 2023 lúc 22:36

Program HOC24;

var i,d1,d2: byte;

s: string;

begin

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

d1:=0; d2:=0;

for i:=1 to length(s) do

begin

if s[i] in ['0'..'9'] then d1:=d1+1;

if s[i] in ['A'..'z'] then d2:=d2+1;

end;

writeln('So ky tu so: ',d1);

write('So ky tu chu cai: ',d2);

readln

end.

Lê Trần Nam Khánh
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 12 2021 lúc 23:37

#include <bits/stdc++.h>

using namespace std;

string st, a[1000];

int d,i,dem,kt,j,ln;

char x;

int main()

{

freopen("charhz.inp","r",stdin);

freopen("charhz.out",'"w",stdout);

cin>>st;

d=st.length();

a[1]=st[0];

dem=1;

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

{

kt=0;

for (j=1; j<=dem; j++)

if (a[j]==st[i]) kt=1;

if (kt==0) 

{

dem++;

a[dem]=st[i];

}

}

ln=0;

for (i=1; i<=dem; i++)

{

dem=0;

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

if (a[i]==st[j]) dem++;

if (ln<dem) 

{

ln=dem;

x=a[i];

}

}

cout<<x<<" "<<ln;

return 0;

}

APOK FF
Xem chi tiết
Trần Trọng Hùng
Xem chi tiết
Hello1234
Xem chi tiết
Kiều Vũ Linh
27 tháng 3 2022 lúc 10:26

var s:string;

i:integer;

begin

write('Nhap xau ki tu S = ');readln(s);

for i:=1 to length(s) do

begin

if s[i] <> '0' then write('Vi tri cua so 0 cuoi cung la ',i-1);

i:=length(s);

end;

readln;

end.

Phạm trọng Thành
Xem chi tiết
Lê Bảo Châu
6 tháng 1 lúc 14:43

#include <bits/stdc++.h>
using namespace std;
int main() {
    string str;
    getline(cin, str);
    string ans = "";
    for (char c : str) {
        if (!isdigit(c)) {
            ans += c;
        }
    }
    cout <<ans;
}

Theo mk là như v

uses crt;

var st:string;

d,i:integer;

begin

clrscr;

readln(st);

d:=length(st);

for i:=1 to d do

if not(st[i] in ['0'..'9']) then write(st[i]);

readln;

end.

Nguyễn An
Xem chi tiết
Nguyễn Lê Phước Thịnh
10 tháng 7 2021 lúc 14:32

uses crt;

var s,s1,s2:string;

i,d:integer;

begin

clrscr;

readln(s);

s1:=''

s2:=''

d:=length(s);

for i:=1 to d do

  begin

if s[i] in ['0'..'9'] then s1:=s1+s[i];

if (s[i] in ['a'..'z']) or (s[i] in ['A'..'Z']) then s2:=s2+s[i];

end;

writeln('Xau chua cac ki tu so la: ',s1);

writeln('Xau chua cac ki tu chu la: ',s2);

readln;

end.

HT thai an
Xem chi tiết