K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

D
datcoder
CTVVIP
19 tháng 12 2023

Program HOC24;

var s: string;

i,x: byte;

begin

readln(s);

//-----------Câu a

while s[1]=#32 do delete(s,1,1);

while s[length(s)]=#32 do delete(s,length(s),1);

while pos(#32#32,s)<>0 do delete(s,pos(#32#32,1);

writeln(s);

//-------------Câu b

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

for i:=1 to length(s) do

if s[i]=#32 upcase(s[i+1]);

writeln(s);

//--------------Câu c

for i:=1 to length(s) do

if s[i]=#32 then x:=i;

for i:=x+1 to length(s) do

write(s[i]);

//---------------------------

readln

end.

20 tháng 3 2023

xau = input('Nhap chuoi: ')

so_khoang_cach = xau.count(' ')

print('So khoang cach:', so_khoang_cach)

vi_tri = []

for i in range(len(xau)):

     if xau[i] == ' ':

          vi_tri.append(i)

print('Vi tri khoang cach:', vi_tri)

26 tháng 7 2023

program tach_ho_ten;

uses crt;

var

     s, ho_dem, ten: string;

     i, vt: integer;

begin

     write('Nhap xau s: ');

     readln(s);

     vt := 0;

     for i := length(s) downto 1 do

     begin

          if s[i] = ' ' then

          begin

               vt := i;

               break;

          end;

     end;

     ho_dem := copy(s, 1, vt-1);

     ten := copy(s, vt+1, length(s)-vt);

     writeln('Ho dem: ', ho_dem);

     writeln('Ten   : ', ten);

     readln;

end.

10 tháng 5 2023

Var s,st:string;

i:integer;

Begin

Write('Nhap xau ');readln(s);

For i:=1 to length(s) do

If s[i] in ['0'..'9'] then st:=st+s[i];

Write('Cac ki tu so co trong day la ',st);

Readln

End.

10 tháng 5 2023

giúp em với ạ em cảm ơn nhìuu

26 tháng 4 2023

Python:

n = [float(i) for i in input("Nhập vào một xâu: ").split()]
tong = sum(n)
TB = tong / len(n)
print("Tổng các số trong xâu là: ", tong)
print("Trung bình các số trong xâu là: ", TB)

Pascal:
program tinh_tong_trungbinh;
var
  input_string: string;
  numbers: array of real;
  i, n: integer;
  sum, average: real;
begin
  write('Nhập vào một xâu: ');
  readln(input_string);
  
  // Tách chuỗi thành danh sách các số
  n := 0;
  for i := 1 to length(input_string) do
  begin
    if (input_string[i] in ['0'..'9', '.', '-']) then
    begin
      if (i = 1) or (not (input_string[i-1] in ['0'..'9', '.', '-'])) then
        n := n + 1;
    end;
  end;
  
  SetLength(numbers, n);
  n := 0;
  for i := 1 to length(input_string) do
  begin
    if (input_string[i] in ['0'..'9', '.', '-']) then
    begin
      if (i = 1) or (not (input_string[i-1] in ['0'..'9', '.', '-'])) then
      begin
        val(copy(input_string, i, length(input_string) - i + 1), numbers[n], i);
        n := n + 1;
      end;
    end;
  end;
  
  // Tính tổng và trung bình
  sum := 0;
  for i := 0 to n - 1 do
    sum := sum + numbers[i];
  
  if (n > 0) then
  begin
    average := sum / n;
    // Hiển thị kết quả
    writeln('Tổng: ', sum:0:2);
    writeln('Trung bình: ', average:0:2);
  end
  else
    writeln('Không có số hợp lệ để tính toán');
    
  readln;
end.

 

7 tháng 2 2023

#include <bits/stdc++.h>

using namespace std;
string a,b,d;
int c;
int main()
{
    cin>>a>>b>>c;
    for(int i=1;i<=c;i++){
        d+=a;
    }
    if(d==b)cout<<"YES";
    else cout<<"NO";
}

Mik làm bằng ngôn ngữ C++;

 

TUVUNG - TỪ VỰNGDữ liệu vào: standard inputDữ liệu ra: standard outputGiới hạn thời gian: 1.0 giâyGiới hạn bộ nhớ: 128 megabyte       Uyên viết ra một xâu S có độ dài không quá 106 chỉ gồm các kí tự thường trong bảng chữ cái tiếng Anh. Một từ vựng là một từ thu được bằng cách sao chép một đoạn kí tự liên tiếp từ xâu S thoả mãn một trong hai điều kiện:     - Bắt đầu bằng một nguyên âm (a, e, i, o, u),...
Đọc tiếp

TUVUNG - TỪ VỰNG

Dữ liệu vào: standard input

Dữ liệu ra: standard output

Giới hạn thời gian: 1.0 giây

Giới hạn bộ nhớ: 128 megabyte 

 

     Uyên viết ra một xâu S có độ dài không quá 106 chỉ gồm các kí tự thường trong bảng chữ cái tiếng Anh. Một từ vựng là một từ thu được bằng cách sao chép một đoạn kí tự liên tiếp từ xâu S thoả mãn một trong hai điều kiện:

     - Bắt đầu bằng một nguyên âm (a, e, i, o, u), kết thúc bằng một phụ âm

     - bắt đầu bằng một phụ âm và kết thúc là một nguyên âm.

     Yêu cầu: Giúp Uyên đếm số lượng từ vựng có trong S theo quy tắc trên.

Dữ liệu nhập:

  - Gồm một xâu S.

Kết quả:

  - in ra một số duy nhất là kết quả tìm được.

Ràng buộc:

  - 1/3 số test: Xâu S dài không quá 104.

Ví dụ

input

adceba

output

9

Lưu ý:

  - Đây không phải là test chấm chính thức của BTC.

1
27 tháng 6 2023
#include<bits/stdc++.h> using namespace std;string s;long long c[1000001],w[1000001];int main() {getline(cin,s);long long n = s.size();if(s[n-1] == 'a' || s[n-1] == 'e' || s[n-1] == 'i' || s[n-1] == 'o' || s[n-1] == 'u') c[n-1] = 0;else c[n-1] = 1;for(int i = n-2;i >= 0;i--) {if(s[i] == 'a' || s[i] == 'e' || s[i] == 'i' || s[i] == 'o' || s[i] == 'u') {c[i] = c[i+1];}else {c[i] = c[i+1]+1;}}if(s[n-1] == 'a' || s[n-1] == 'e' || s[n-1] == 'i' || s[n-1] == 'o' || s[n-1] == 'u') w[n-1] = 1;else w[n-1] = 0;for(int i = n - 2; i >= 0;i--) {if(s[i] != 'a'&s[i] != 'e'& s[i] != 'i' &s[i] != 'o'&s[i] != 'u') {w[i] = w[i+1];}else w[i] = w[i+1]+1;}long long dem = 0;for(int i = 0;i < s.size();i++) {if(s[i] == 'a' || s[i] == 'e' || s[i] == 'i' || s[i] == 'o' || s[i] == 'u') {dem = dem + c[i];}else {dem = dem + w[i];}}cout << dem;return 0;}
27 tháng 6 2023
#include<bits/stdc++.h>using namespace std;string s;long long c[1000001],w[1000001];int main() {getline(cin,s);long long n = s.size();if(s[n-1] == 'a' || s[n-1] == 'e' || s[n-1] == 'i' || s[n-1] == 'o' || s[n-1] == 'u') c[n-1] = 0;else c[n-1] = 1;for(int i = n-2;i >= 0;i--) {if(s[i] == 'a' || s[i] == 'e' || s[i] == 'i' || s[i] == 'o' || s[i] == 'u') {c[i] = c[i+1];}else {c[i] = c[i+1]+1;}}if(s[n-1] == 'a' || s[n-1] == 'e' || s[n-1] == 'i' || s[n-1] == 'o' || s[n-1] == 'u') w[n-1] = 1;else w[n-1] = 0;for(int i = n - 2; i >= 0;i--) {if(s[i] != 'a'&s[i] != 'e'& s[i] != 'i' &s[i] != 'o'&s[i] != 'u') {w[i] = w[i+1];}else w[i] = w[i+1]+1;}long long dem = 0;for(int i = 0;i < s.size();i++) {if(s[i] == 'a' || s[i] == 'e' || s[i] == 'i' || s[i] == 'o' || s[i] == 'u') {dem = dem + c[i];}else {dem = dem + w[i];}}cout << dem;return 0;}    
16 tháng 3 2023

A=input("Nhập dãy các số cách nhau bởi dấu cách: ")

S=A.split()

k = 0

n=[]

c = len(S)

m1 = min(S)

m2 = max(S)

for x in S:

          n.append(float(x))

b=[]

for a in n :

          if a % 2 != 0 :

                   b.append(float(a))

S=0

for i in b:

    k=k+i

print("Số lượng các số đã nhập",c)

print("Tổng các số lẻ là", k)

print("Số nhỏ nhất là", m1)

print("Số lớn nhất là ", m2)

16 tháng 3 2023

làm sao để tìm số nhỏ nhất ở vị trí lớn nhất vậy bạn