Tìm kí tự thứ 101 của chuỗi kí tự lặp: TINHOCTRETINHOCTRE…
Tim kí tự thứ 101 của chuổi kí tự lặp: TINHOCTRETINHOCTRE...
TINHOCTRE là có 9 chữ
có tất cả chữ TINHOCTRE là
101 : 9 = 11 ( dư 2)
Dư 2 tức là chữ T và I cho nên chữ số 101 là chữ I
Câu 1:
Viết chương trình có một chuỗi kí tự gồm chữ cái, chữ số và khoảng cách và thực hiện:
a. Trong chuỗi kí tự có bao nhiêu kí tự số?
b. Tính tổng các chữ số.
c. Xuất ra tất cả kí tự chữ có trong chuỗi theo thứ tự vừa nhập.
- Yêu cầu: Cho trước một chuỗi kí tự S chỉ gồm chữ cái, chữ số và khoảng cách trên một dòng. Hãy thực hiện các yêu cầu trên.
- Dữ liệu vào: Nhập từ bàn phím gồm một dòng ghi chuỗi kí tự S (có độ dài không quá 255 ký tự). Giả thiết dữ liệu được nhập đúng đắn, không cần kiểm tra
- Kết quả: In ra màn hình theo cấu trúc sau:
+ Dòng 1: Ghi có bao nhiêu kí tự số
+ Dòng 2: Ghi tổng các chữ số
+ Dòng 3: Ghi tất cả các kí tự chữ cái trong chuỗi
Câu 2:
Một dãy số gồm N số nguyên dương . Tính tổng các phần tử có trong dãy số, in ra số lần xuất hiện các phần tử có trong dãy số.
- Yêu cầu: Cho một dãy số gồm N số nguyên dương. Hãy thực hiện các yêu cầu trên. Giả thiết dữ liệu được nhập đúng đắn, không cần kiểm tra
- Dữ liệu vào: Nhập từ bàn phím có dạng như sau:
+ Dòng 1: Ghi số nguyên dương N (1≤N≤100000)
+ Dòng 2: Ghi dãy N số nguyên dương a1, a2,..., an (1≤ai≤1000,i=1..n)
- Kết quả: In ra màn hình theo cấu trúc sau:
+ Dòng 1: In ra tổng các phần tử trong dãy số.
+ Dòng tiếp theo: In ra phần tử và số lần xuất hiện của nó.
Giúp mik với, mik đang mắc!!!làm bằng pascal nhé, nặng cũng đc, máy mik intel i9 12900k và rtx 3090 nhé :) mới mua vài hôm trước:)
Câu 2:
uses crt;
var a,b:array[1..100]of integer;
i,n,t,dem,j,kt,dem1:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
readln(a[i]);
t:=0;
for i:=1 to n do t:=t+a[i];
writeln(t);
dem:=1;
b[1]:=a[1];
for i:=1 to n do
begin
kt:=0;
for j:=1 to dem do
if b[j]=a[i] then kt:=1;
if kt=0 then
begin
inc(dem);
b[dem]:=a[i];
end;
end;
for i:=1 to dem do
begin
dem1:=0;
for j:=1 to n do
if a[j]=b[i] then inc(dem1);
writeln(b[i],' xuat hien ',dem1,' lan');
end;
readln;
end.
Câu 1:
Viết chương trình có một chuỗi kí tự gồm chữ cái, chữ số và khoảng cách và thực hiện:
a. Trong chuỗi kí tự có bao nhiêu kí tự số?
b. Tính tổng các chữ số.
c. Xuất ra tất cả kí tự chữ có trong chuỗi theo thứ tự vừa nhập.
- Yêu cầu: Cho trước một chuỗi kí tự S chỉ gồm chữ cái, chữ số và khoảng cách trên một dòng. Hãy thực hiện các yêu cầu trên.
- Dữ liệu vào: Cho từ tệp văn bản có tên XAU.INP gồm một dòng ghi chuỗi kí tự S (có độ dài không quá 255 ký tự). Giả thiết dữ liệu được nhập đúng đắn, không cần kiểm tra
- Kết quả: Ghi ra tệp văn bản có tên XAU.OUT theo cấu trúc sau:
+ Dòng 1: Ghi có bao nhiêu kí tự số
+ Dòng 2: Ghi tổng các chữ số
+ Dòng 3: Ghi tất cả các kí tự chữ cái trong chuỗi
Ví dụ:
XAU.INP | XAU.OUT |
Ky2thichon5hoc5sinhgioi3lop719 | 7 32 Kythichonhocsinhgioilop |
Giúp mik với, đúng mik cho 1 like nhé và bằng pascal nhé !!!
def tach_chuoi(chuoi):
ky_tu_so = " "
ky_tu_chu = " "
for ky_tu in chuoi:
if ky_tu.isdigit():
ky_tu_so += ky_tu
elif ky_tu.isalpha():
ky_tu_chu += ky_tu
return ky_tu_so, ky_tu_chu
chuoi = input("Nhập vào một chuỗi: ")
ky_tu_so, ky_tu_chu = tach_chuoi(chuoi)
print("Các ký tự số trong chuỗi:", ky_tu_so)
print("Các ký tự chữ cái trong chuỗi:", ky_tu_chu)
uses crt;
var st:string;
d,i:integer;
begin
clrscr;
readln(st);
d:=length(st);
for i:=1 to d do
if (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.
Nhanh mình đang cần gấpCho chuỗi kí tự S gồm toàn các chữ cái in hoa (A…Z) với độ dài không vượt quá 104 . Yêu cầu: Hãy tìm đoạn con các kí tự liên tiếp dài nhất sao cho không có kí tự nào xuất hiện nhiều hơn một lần. Trong trường hợp có nhiều hơn một đoạn con có cùng chiều dài dài nhất, hãy chỉ ra đoạn xuất hiện đầu tiên trong chuỗi S. Dữ liệu: Vào từ văn bản DOANMAX.INP: - Gồm một dòng duy nhất chứa chuỗi S. Kết quả: Ghi ra file văn bản DOANMAX.OUT - Chỉ một dòng duy nhất chứa số nguyên P và L tương ứng là vị trí và chiều dài của đoạn con dài
viết chương trình nhập vào chuỗi S a)Đếm xem trong chuỗi có bao nhiêu kí tự b)xuất ra chuỗi đảo c)xóa kí tự trắng dư thừa trong xâu d) đếm các chữ số trong xâu
mong các bạn giúp mình với.
uses crt;
var s:string;
i,d,dem:integer;
begin
clrscr;
write('Nhap chuoi S:'); readln(s);
d:=length(s);
writeln('Trong chuoi ',s,' co ',d,' ki tu');
writeln('Chuoi dao cua chuoi ',s,' la: ');
for i:=d downto 1 do
write(s[i]:4);
writeln;
dem:=0;
for i:=1 to d do
if s[i] in ['0'..'9'] then inc(dem);
writeln('So chu so trong xau la: ',dem);
readln;
end.
Cho một xâu S có N kí tự. Người ta viết các kí tự của xâu S lên vòng tròn theo chiều kim đồng hồ. Như vậy, nếu đi trên vòng tròn theo chiều kim đồng hồ thì kí tự thứ N+1 chính là kí tự thứ nhất của xâu S. Xuất phát từ ký tự thứ nhất của xâu S trên vòng tròn, ta đếm từng ký tự theo chiều kim đồng hồ đến kí tự thứ K rồi cắt vòng tròn tại vị trí sau kí tự thứ K này, ta được một xâu mới R mà ký tự đầu tiên của xâu mới là kí tự thứ K+1. Dữ liệu vào: Cho từ tệp văn bản DOIXAU.INP dòng đầu tiên là xâu S, dòng thứ 2 là số nguyên K(1 ≤ K ≤ 104). Kết quả: Ghi vào file DOIXAU.OUT xâu R.
Bài 6: Viết CT thực hiện các yêu cầu sau:
- Đọc vào một xâu kí tự.
- Sắp xếp lại xâu này sao cho kí tự thứ 1 đổi chỗ cho kí tự thứ
n, kí tự thứ 3 đổi chỗ cho kí tự thứ n-2,… kí tự ở vị trí chẵn
không đổi.
- Đưa xâu đã sắp xếp ra màn hình.
#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++) swap(st[i],st[n-1-(i-1)]);
cout<<st;
return 0;
}