Viết chương trình C++ nhập vào một chuỗi gồm các ký tự 'a..z' và 'A...Z' và '0...9' nhập liên tục không có khoảng trắng và xen kẽ nhau giữa các số và chữ có độ dài L ( 4 kỳ tự < L< 40 ký tự). Sau đó: A) xuất các chữ số có trong duỗi theo thứ tự vừa nhập; cho biết số vừa xuất ra là số chẵn hay số lẻ; tính tổng các chữ số vừa nhập; B) xuất các ký tự có trong chuỗi theo thứ tự vừa nhập; viết hoa các ký tự này
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.
uses crt;
const fi='dulieu.txt';
var f1:text;
st:string;
i,d:integer;
begin
clrscr;
assign(f1,fi); rewrite(f1);
write('Nhap xau:'); readln(st);
d:=length(st);
for i:=1 to d do
if (st[i] in ['A'..Z']) or (st[i] in ['0'..'9']) or (st[i]=#32) then write(f1,st[i]);
close(f1);
end.
uses crt;
const fi='dulieu.txt';
var f1:text;
st:string;
i,d:integer;
begin
clrscr;
assign(f1,fi); rewrite(f1);
write('Nhap xau:'); readln(st);
d:=length(st);
for i:=1 to d do
if (st[i] in ['A'..Z']) or (st[i] in ['0'..'9']) or (st[i]=#32) then write(f1,st[i]);
close(f1);
end.
#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.
câu 1 Uses Crt;
Var St:String;
dem: Array[‘A’..’Z’] Of Byte
; i:Byte;
ch:Char;
Begin Write(‘Nhap xau St: ‘);
Readln(St);
{Khởi tạo mảng} For ch:=’A’ To ‘Z’ Do dem[ch]:=0;
{Duyệt xâu} For i:=1 To Length(St) Do If Upcase(St[i]) IN [‘A’..’Z’] Then Inc(dem[Upcase(St[i])]);
{Liệt kê các ký tự ra màn hình} For ch:=’A’ To ‘Z’ Do If dem[ch]>0 Then Writeln(ch,’ : ’,dem[ch]);
Readln;
def dem_so_tu(chuoi):
dem = 0
tu = chuoi.split()
for word in tu:
if word.isalpha():
dem += 1
return dem
chuoi = input("Nhập một chuỗi: ")
so_tu = dem_so_tu(chuoi)
print("Số từ trong chuỗi là:", so_tu)