nhập vào 1 số nguyên dương n in ra thông báo
1 số đó có bao nhiêu chữ số
2 tổng các chữ số
Những câu hỏi liên quan
: Nhập vào 01 số nguyên dương n ( nhỏ hơn 100) , sau đó , in ra từng dòng các số chẵn từ 1 đến số n, sau đó in thông báo có bao nhiêu số lẻ từ 1 đến n. (for..to..do + if..then)Nhập vào 01 số nguyên dương m ( nhỏ hơn 100) , sau đó , in ra từng dòng các số lẻ từ 1 đến số m, sau đó in thông báo có bao nhiêu số lẻ từ 1 đến m. (for..to..do + if..then)dientich_chuvi.pas : Nhập vào bán kính đường tròn , sau đó dùng một biến hỏi để hỏi xem nếu gõ số 1 thì sẽ tính diện tích , ngược lại sẽ tính ch...
Đọc tiếp
: Nhập vào 01 số nguyên dương n ( nhỏ hơn 100) , sau đó , in ra từng dòng các số chẵn từ 1 đến số n, sau đó in thông báo có bao nhiêu số lẻ từ 1 đến n. (for..to..do + if..then)
Nhập vào 01 số nguyên dương m ( nhỏ hơn 100) , sau đó , in ra từng dòng các số lẻ từ 1 đến số m, sau đó in thông báo có bao nhiêu số lẻ từ 1 đến m. (for..to..do + if..then)
dientich_chuvi.pas : Nhập vào bán kính đường tròn , sau đó dùng một biến hỏi để hỏi xem nếu gõ số 1 thì sẽ tính diện tích , ngược lại sẽ tính chu vi đường tròn. (câu điều kiện)
: Viết chương trình cho phép người dùng nhập vào số năm, sau đó nhập vào lượng mưa của từng năm. Xuất ra tổng lượng mưa và lượng mưa trung bình. (for..to..do + kiểu mảng)
Bài 1: Viết chương trình nhập 1 số nguyên dương n có 3 chữ số.Hãy thông báo ra màn hình tổng các chữ số của nó. Bài 2: giống bài trên nhưng là 5 chữ số. Giúp mình với ạ, mình cần gấp :
Bài 1:
uses crt;
var n,t,i,d,x:integer;
st:string;
begin
clrscr;
readln(n);
str(n,st);
d:=length(st);
t:=0;
for i:=1 to d do
begin
val(st[i],x);
t:=t+x;
end;
writeln(t);
readln;
end.
Đúng 1
Bình luận (0)
Nhập vào bàn phím mảng 1 chiều gồm N số nguyên:
1.In ra màn hình giá trị lớn nhất
2. Tính tổng các số chẵn các số chẵn có trong mảng
3. Thông báo có bao nhiêu số âm trong mảng
4. Tính tích các phần tử dương và chia hết cho 3
( mik cần gấp lém :(( )
Chương trình nhập n và mảng hay nhập mảng chưa biết số hạng tử v
Đúng 0
Bình luận (0)
#include <bits/stdc++.h>
using namespace std;
long long a[1000],n,i,ln,t1,dem,s;
int main()
{
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
ln=a[1];
for (i=1; i<=n; i++) ln=max(ln,a[i]);
cout<<ln<<endl;
t=0;
for (i=1; i<=n; i++) if (a[i]%2==0) t=t+a[i];
cout<<t<<endl;
dem=0;
for (i=1; i<=n; i++) if (a[i]<0) dem++;
cout<<dem<<" ";
s=1;
for (i=1; i<=n; i++)
if ((a[i]%3==0) and (a[i]>0)) s=s*a[i];
cout<<s;
return 0;
}
Đúng 0
Bình luận (1)
Var a:array[1..200] of integer;
i,n,max,s1,dem,s2:integer;
begin
write('Nhap so luong phan tu cua mang n = ');readln(n);
for i:=1 to n do
begin
write('Nhap phan tu thu ',i,' = ');readln(a[i]);
end;
max:=a[1];
for i:=2 to n do
if a[i] > max then max:=a[i];
for i:=1 to n do
begin
if a[i] mod 2 = 0 then s1:=s1+a[i];
end;
for i:=1 to n do
begin
if a[i] < 0 then dem:=dem + 1;
end;
s2:=1;
for i:=1 to n do
begin
if (a[i] > 0) and (a[i] mod 3 = 0) then s2:=s2*a[i];
end;
writeln('gia tri lon nhat trong mang la ',max);
writeln('tong cac so chan la ',s1);
writeln('Co ',dem,' so am');
write('tich cac so duong va chia het cho 3 la ',s2);
end;
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình nhập vào một số nguyên N và thực hiện:
a. Số nguyên dương N có bao nhiêu chữ số?
b. Tính tổng các chữ số của N
c. In ra chữ số lớn nhất của N
*Yêu cầu: N là một số nguyên dương(N bé hơn hoặc bằng 109)
uses crt;var n: longint; chrn: string; valn,sum,max,i,preperror: byte;begin write('Nhap so can kiem tra: '); readln(n); str(n,chrn); for i:=1 to length(chrn) do begin val(chrn[i],valn,preperror); sum:=sum+valn; if max<valn then max:=valn; valn:=0 end; writeln('Ket qua: '); writeln(length(chrn)); writeln(sum); write(max); readln;end.uses crt;var n: longint; chrn: string; valn,sum,max,i,preperror: byte;begin write('Nhap so can kiem tra: '); readln(n); str(n,chrn); for i:=1 to length(chrn) do begin val(chrn[i],valn,preperror); sum:=sum+valn; if max<valn then max:=valn; valn:=0 end; writeln('Ket qua: '); writeln(length(chrn)); writeln(sum); write(max); readln;end.
Đúng 0
Bình luận (0)
Program HOC24;
var N:longint;
max,tg,t,d: integer;
Begin
write('Nhap N : '); readln(N);
max:=0;
while n<>0 do
begin
tg:=n mod 10;
d:=d+1;
t:=t+tg;
if tg>max then max:=tg;
n:=n div 10;
end;
writeln('So nguyen N co ',d,' chu so');
writeln('Tong cac chu so cua N la : ',t);
write('Chu so lon nhat cua N la :',max);
readln
end.
Đúng 2
Bình luận (0)
uses crt;
var n,d,i,t,max,x:longint;
y:integer;
st:string;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n>0;
str(n,st);
d:=length(st);
writeln('So chu so cua ',n,' la: ',d);
t:=0;
max:=0;
for i:=1 to d do
begin
val(st[i],x,y);
t:=t+x;
if max<x then max:=x;
end;
writeln('Tong cac chu so cua ',n,' la: ',t);
writeln('Chu so lon nhat cua ',n,' la: ',max);
readln;
end.
Đúng 1
Bình luận (0)
Bài 1: Cho số có 2 chữ số, in ra tổng của 2 chữ số đó, ví dụ: Nhập 15 in ra tổng của 2 chữ số là: 1+56 . Bài 2: Nhập thông tin cá nhân của một người gồm có: Ho_ten, Nam_sinh, Gioi_tinh. Hãy in ra các thông tin trên và cho biết người đó hiện nay bao nhiêu tuổi , cho biết: Tuổi2021-Nam_sinh. Bài 3: Cho số có 4 chữ số, in ra số đảo của số đó, ví dụ: nhập 2357, in ra 7532ko bt lm
Đọc tiếp
Bài 1: Cho số có 2 chữ số, in ra tổng của 2 chữ số đó, ví dụ: Nhập 15 in ra tổng của 2 chữ số là: 1+5=6 .
Bài 2: Nhập thông tin cá nhân của một người gồm có: Ho_ten, Nam_sinh, Gioi_tinh. Hãy in ra các thông tin trên và cho biết người đó hiện nay bao nhiêu tuổi , cho biết: Tuổi=2021-Nam_sinh.
Bài 3: Cho số có 4 chữ số, in ra số đảo của số đó, ví dụ: nhập 2357, in ra 7532
ko bt lm
Bài 1:
#include <bits/stdc++.h>
using namespace std;
int a,dv,ch;
int main()
{
cin>>a;
dv=a%10;
ch=a/10;
cout<<dv+ch;
return 0;
}
Đúng 0
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
viết chương trình nhập vào một số nguyên dương n . Rồi xuất ra màn hình các yêu cầu sau:
a, Số n có bao nhiêu chữ só.
b, Tổng các chữ số của n.
c, Số n có phải là số nguyên tố không.
d, Tổng các chữ số của nó có phải là số nguyên tố không.
mn giúp em vs ạ
program ct;
uses crt;
var dem,n,s,max,t:longint;
begin
writeln('nhap n:');readln(n);
while n>0 do begin
s:=n mod 10;
t:=t+s;
if max<s then max:=s;
dem:=dem+1;
n:=n div 10;
end;
writeln('tong la',t,',','co',' ',dem,' ','chu so',',','chu so lon nhat la:',max);
readln
end.
bạn xem lại nha mik làm đây nhưng k bt đk
Đúng 0
Bình luận (0)
Bài 1: Cho số có 2 chữ số, in ra tổng của 2 chữ số đó, ví dụ: Nhập 15 in ra tổng của 2 chữ số là: 1+5=6 .
Bài 2: Nhập thông tin cá nhân của một người gồm có: Ho_ten, Nam_sinh, Gioi_tinh. Hãy in ra các thông tin trên và cho biết người đó hiện nay bao nhiêu tuổi , cho biết: Tuổi=2021-Nam_sinh.
Bài 3: Cho số có 4 chữ số, in ra số đảo của số đó, ví dụ: nhập 2357, in ra 7532
PASCALBài 1: Cho số có 2 chữ số, in ra tổng của 2 chữ số đó, ví dụ: Nhập 79 in ra tổng của 2 chữ số là: 7+916Bài 2: Nhập thông tin cá nhân của một người gồm có: Ho_ten, Nam_sinh, Gioi_tinh. Hãy in ra các thông tin trên và cho biết người đó hiện nay bao nhiêu tuổi , cho biết: Tuổi2021-Nam_sinh. Bài 3: Cho số có 4 chữ số, in ra số đảo của số đó, ví dụ: nhập 2357, in ra 7532 GIÚP MÌNH GẤP VỚI Ạ
Đọc tiếp
PASCAL
Bài 1: Cho số có 2 chữ số, in ra tổng của 2 chữ số đó, ví dụ: Nhập 79 in ra tổng của 2 chữ số là: 7+9=16
Bài 2: Nhập thông tin cá nhân của một người gồm có: Ho_ten, Nam_sinh, Gioi_tinh. Hãy in ra các thông tin trên và cho biết người đó hiện nay bao nhiêu tuổi , cho biết: Tuổi=2021-Nam_sinh.
Bài 3: Cho số có 4 chữ số, in ra số đảo của số đó, ví dụ: nhập 2357, in ra 7532
GIÚP MÌNH GẤP VỚI Ạ
Bài 1:
Program HOC24;
var x,t: byte;
begin
write('Nhap so co 2 chu so: '); readln(x);
t:=(x mod 10)+(x div 10);
write('Tong 2 chu so cua so do la: ',t);
readln
end.
Đúng 0
Bình luận (1)
Bài 2:
Program HOC24;
var ho_ten,gioi_tinh: string;
nam_sinh: integer;
begin
write('Ho va ten: '); readln(ho_ten);
write('Nam sinh: '); readln(nam_sinh);
write('Gioi_tinh: '); readln(gioi_tinh);
write('Nguoi do nam nay ',2021-nam_sinh,' tuoi');
readln
end.
Đúng 1
Bình luận (1)
Bài 3:
Program HOC24;
var s: string;
i: byte;
begin
write('Nhap so co 4 chu so '); readln(s);
for i:=length(s) downto 1 do write(s[i]);
readln
end.
Đúng 0
Bình luận (1)
1. Cho N và dãy N số nguyên, đếm số 0 trong dãy và thông báo ra màn hình 2. Tính tổng 3 số lớn nhất trong dãy N số nguyên 3. Tính tổng các chữ số của số nguyên dương N
1:
#include <bits/stdc++.h>
using namespace std;
long long n,i,dem,x;
int main()
{
cin>>n;
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x==0) dem++;
}
cout<<dem;
return 0;
}
Đúng 1
Bình luận (0)