viết chương trình nhập vào một số tự nhiên n và cho biết n có bao nhiêu chữ số,
Những câu hỏi liên quan
Viết chương trình nhập vào số tự nhiên N(N≤109)từ bàn phím đếm xem N có bao nhiêu chữ số 0
#include <bits/stdc++.h>
using namespace std;
string st;
int d,i,dem;
int main()
{
cin>>st;
d=st.length();
dem=0;
for (i=0; i<d; i++)
if (st[i]=='0') dem++;
cout<<dem;
return 0;
}
Đúng 0
Bình luận (0)
Var n,dem:longint;
Begin
Write('Nhap so n = ');readln(n);
While n >= 10 do
Begin
if n mod 10 = 0 then dem:=dem+1;
n:=n div 10;
End;
Write('So vua nhap co ',dem,' so 0');
Readln;
End.
Đúng 0
Bình luận (0)
Câu 1: viết chương trình nhập vào N số tự nhiên đầu tiên,đếm xem có bao nhiêu số là số chẵn Câu 2: Viết chương trình nhập vào N số tự nhiên tính tổng các số chia hết cho 3 Em cần gấp lắm ạ:(
1:
#include <bits/stdc++.h>
using namespace std;
long long dem,i,n,x;
int main()
{
cin>>n;
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%2==0) dem++;
}
cout<<dem;
return 0;
}
Câu 2:
#include <bits/stdc++.h>
using namespace std;
long long x,n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x%3==0) t+=x;
}
cout<<t;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình cho biết có bao nhiêu số tự nhiên nhỏ hơn n chia hết cho 7. Biết n được nhập vào từ bàn phím.
uses crt;
var n,i,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
for i:=1 to n do
if i mod 7=0 then inc(dem);
write(dem);
readln;
end.
Đúng 2
Bình luận (0)
Bài 1: Viết chương trình nhập vào số nguyên dương n (0<n<100) và khởi tạo dãy gồm n số nguyên Ai (-32000<Ai<32000). Đếm và in ra màn hình các số dương có 3 chữ số?Bài 2: Viết chương trình nhập vào một xâu kí tự, đếm xem trong xâu có bao nhiêu kí tự chữ số 1?
Xem chi tiết
25 tháng 4 2023 lúc 10:00
Viết chương trình nhập vào một số tự nhiên N, đếm xem trong khoảng từ 0 đến N có bao nhiêu số lẻ và tính tổng các số lẻ đó
#include <bits/stdc++.h>
using namespace std;
int main()
{
long long n,dem=0,s=0;
cin >> n;
for (long long i=1;i<=n;i+=2){
dem++;
s+=i;
}
cout << "tu 0 den n co: " << dem << " so le" << endl;
cout << "tong cac so le do la: " << s;
return 0;
Đúng 1
Bình luận (0)
25 tháng 4 2023 lúc 8:54
Viết chương trình nhập vào một số tự nhiên N, đếm xem trong khoảng từ 0 đến N có bao nhiêu số lẻ và tính tổng các số lẻ đó
#include <bits/stdc++.h>
using namespace std;
int main()
{
long long n,dem=0,s=0;
cin >> n;
for (long long i=1;i<=n;i+=2){
dem++;
s+=i;
}
cout << "tu 0 den n co: " << dem << " so le" << endl;
cout << "tong cac so le do la: " << s;
return 0;
}
Đúng 0
Bình luận (0)
var i,n,d:integer;
s:longint;
begin
write('n = ');readln(n);
for i:=1 to n do
if i mod 2 <> 0 then
begin
d:=d+1;
s:=s+i;
end;
writeln('co ',d,' so le');
write('tong cac so le la ',s);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập số tự nhiên n từ bàn phím (0 n ≤ 65355).a.Hãy cho biết n có bao nhiêu chữ sốb.Hãy cho biết chữ số lớn nhất, chữ số nhỏ nhất của nc.Tính tổng các chữ số, tích các chữ số của nd.So sánh tổng các chữ số của n với tính các chữ số của ne.Hãy cho biết số đảo ngược của n có phải là số nguyên tố hay không ?mọi người giúp em vs ạ
Đọc tiếp
Viết chương trình nhập số tự nhiên n từ bàn phím (0 < n ≤ 65355).
a.Hãy cho biết n có bao nhiêu chữ số
b.Hãy cho biết chữ số lớn nhất, chữ số nhỏ nhất của n
c.Tính tổng các chữ số, tích các chữ số của n
d.So sánh tổng các chữ số của n với tính các chữ số của n
e.Hãy cho biết số đảo ngược của n có phải là số nguyên tố hay không ?
mọi người giúp em vs ạ
uses crt;
var n:string;
i,ln,nn,t,s,x,y:integer;
begin
clrscr;
readln(n);
writeln(length(n));
ln:=0;
nn:=9;
for i:=1 to length(n) do
begin
val(n[i],x,y);
if ln<x then ln:=x;
if nn>x then nn:=x;
end;
writeln(ln);
writeln(nn);
t:=0;
s:=1;
for i:=1 to length(n) do
begin
val(n[i],x,y);
t:=t+x;
s:=s*x;
end;
writeln(t);
writeln(s);
readln;
end.
Đúng 0
Bình luận (0)
Em hãy viết chương trình Pascal nhập vào một số tự nhiên n thoả mãn 2<n<100, nếu sai yêu cầu nhập lại, tính và in ra các bội có 4 chữ số của n.
program TimBoi4ChuSo;
var
n, i: integer;
begin
repeat
writeln('Nhap vao so nguyen n (2<n<100): ');
readln(n);
until (n > 2) and (n < 100);
writeln('Cac boi cua ', n, ' co 4 chu so la: ');
for i := 1000 to 9999 do
begin
if i mod n = 0 then
writeln(i);
end;
end.
Đúng 0
Bình luận (0)
Lập chương trình nhạp vào một số tự nhiên n.Cho biết n có bao nhiêu chữ số, tổng các chữ số của n.
Program HOC24;
var i,n,d,b,t: integer;
begin
write('Nhap so tu nhien N: '); readln(n);
d:=0; t:=0;
while n<>0 do
begin
b:=n mod 10;
d:=d+1;
t:=t+b;
n:=n div 10;
end;
writeln(n,' co ',d,' chu so');
write('Tong cac chu so chu n la: ',t);
readln
end.
Đúng 0
Bình luận (0)
*Cách khác
uses crt;
var n,i,d,x,y,t:integer;
st:string;
begin
clrscr;
write('Nhap n='); readln(n);
str(n,st);
d:=length(st);
writeln('So chu so cua ',n,' la: ',d);
t:=0;
for i:=1 to d do
begin
val(st[i],x,y);
t:=t+x;
end;
writeln('Tong cac chu so cua ',n,' la: ',t);
readln;
end.
Đúng 0
Bình luận (0)