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.

uses crt;

var s:string;

ktu:char;

i,d,dem:integer;

begin

clrscr;

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

write('Nhap ki tu:'); readln(ktu);

d:=length(s);

dem:=0;

for i:=1 to d do 

  if s[i]=ktu then inc(dem);

writeln('So ki tu ',ktu,' trong xau ',s,' la: ',dem);

for i:=1 to d do 

 if s[i]=ktu then delete(s,i,1);

writeln('Xau sau khi xoa cac ki tu ',ktu,' la: ',s);

readln;

end.

12 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

string s1;

int d,i;

int main()

{

getline(cin,s1);

d=s1.length();

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

if ((s1[i]<48) or (s1[i]>57)) cout<<s1[i];

return 0;

}

Bạn chỉ cần đổi bằng hàm chr

10 tháng 5 2022

👊👅😎

10 tháng 5 2022

Jhg

16 tháng 3 2022

TK:

Ví dụ: Với 10 thì tổng các số tự nhiên sẽ là.

Để hiểu được bài này, các bạn cần có kiến thư căn bản trong Java:

Nhập xuất trong Java.Vòng lặp trong Java.Tính tổng các số tự nhiên bằng vòng lặp for Java

Đầu tiên ta cần xác định được số cần tính tổng các số tự nhiên bằng cách sử dụng class Scanner. Người dùng sẽ nhập vào một số, khi đó ta thực hiện tính tổng từ 1 đến số đó.

Bài viết này được đăng tại [free tuts .net]

Khai báo một đối tượng sc thuộc class Scanner, sau đó sử dụng nó để lấy dữ liệu từ bàn phím.

Scanner sc = new Scanner(System.in); System.out.println("Nhập vào một số: "); num = sc.nextInt();

Bây giờ sử dụng một vòng lặp for lặp từ 1 đến số num vừa nhập, khi đó tổng sum = sum + i.

for(int i = 1; i <= num; ++i) { // sum = sum + i; sum += i; }

Để kiểm tra kết quả ta chỉ cần hiển thị sum.

Full code:

import java.util.Scanner; public class Main { public static void main(String[] args) { int num, sum = 0; Scanner sc = new Scanner(System.in); System.out.println("Nhập vào một số: "); num = sc.nextInt(); for(int i = 1; i <= num; ++i) { // sum = sum + i; sum += i; } System.out.println("Tổng các số tự nhiên từ 1 đến "+ num +" là: "+sum); System.out.println("------------------------------------"); System.out.println("Chương trình này được đăng tại Freetuts.net"); } }

Kết quả:

bai18 01 PNG

#include <bits/stdc++.h>

using namespace std;

long long n,i,x,t,h,s;

int main()

{

cin>>n;

t=0; h=0; s=1;

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

{

cin>>x;

t+=x;

h-=x;

s*=x;

}

cout<<t<<endl;

cout<<h<<endl;

cout<<s<<endl;

return 0;

}

8 tháng 7 2023

#include <iostream>
#include <iomanip>
#include <cmath>
#include <cstdio>
using namespace std;

#include <bits/stdc++.h>

int main() {
    int n;
    cin >> n;
    int total = 0;

    for (int i = 1; i <= n; i++) {
        if (i % 20 == 0 && i % 10 != 0) {
            if (i <= (n / 10)) {
                total += i * i;
            }
        } else {
            total += i;
        }
    }
    cout << "The total is: " << total << endl;

    for (int i = 0; i < n; i++) {
        int du = i % 10;
        int tongcacso = i % 10 * i % 10 * i % 10;
        cout << "du = " << du << endl;
        total += du * du * du;
        cout << "\nsum = " << total << endl;
        cout << "sum = (sum+i*i*i) " << endl;
    }

    return 0;
}

12 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

string s1;

int d,i;

int main()

{

getline(cin,s1);

d=s1.length();

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

if ((s1[i]>=48) and (s1[i]<=57)) cout<<s1[i];

return 0;

}

21 tháng 4 2019

Lời giải :

program hotrotinhoc ;

var a: array[1..32000] of integer ;

i,n,max : integer ;

begin

write('Nhap n='); readln(n);

writeln('Nhap gia tri cua cac phan tu');

for i:= 1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

max:=a[1];

for i:= 1 to n do if max<a[i] then max:=a[i];

write('So lon nhat la:',max');

readln

end.

14 tháng 4 2017

uses crt;

var X:string;

demtu,demdc,i:word;

begin

clrscr;

write('nhap cau van X:');readln(X);

writeln('so ki tu la:',length(X));

demtu:=1;

for i:=1 to length(X)-1 do

if (X[i]<>' ') and (X[i+1]=' ') then demtu:=demtu+1;

writeln('so tu la:',demtu);

demdc:=0;

for i:=1 to length(X) do

if X[i]=' ' then demdc:=demdc+1;

writeln('so dau cach la:',demdc);

readln;

end.banhqua

24 tháng 4 2017

bài này mới đúng nè bạn:

uses crt;

var X:string;

demtu,demdc,i:word;

begin

clrscr;

write('nhap cau van X:');readln(X);

writeln('so ki tu la:',length(X));

X:=X+' ';

demtu:=0;

for i:=1 to length(X)-1 do

if (X[i]<>' ') and (X[i+1]=' ') then demtu:=demtu+1;

writeln('so tu la:',demtu);

delete(X,length(X),1);

demdc:=0;

for i:=1 to length(X) do

if X[i]=' ' then demdc:=demdc+1;

writeln('so dau cach la:',demdc);

readln;

end.banhqua