Lập trình C.
Nhập vào một số tự nhiên n (n khai báo kiểu unsigned long)
a. Số tự nhiên n có bao nhiêu chữ số.
b. Hãy tìm chữ số cuối cùng của n.
c. Hãy tìm chữ số đầu tiên của n.
d. Tính tổng các chữ số của n.
e. Hãy tìm số đảo ngược của n
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.
Những câu hỏi liên quan
23 tháng 3 2022
var n,T,m,i : byte;
s:string;
code:integer;
begin
write('n = '); readln(n); str(n,S);
write(n, ' có ',length(s),' chữ số'); {Hết câu a}
for i:=1 to length(S) do begin
val(S[i],m,code);
if m mod 2 = 0 then T:=T+m;
end;
write('Tổng các chữ số chẵn của ',n,' bằng : S = ',S); {Hết câu b}
readln
end.
V
2
ML
27 tháng 2 2021
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.
27 tháng 2 2021
*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.
16 tháng 9 2015
Các số là:
2035;2053;2305;2350;2503;2530;3025;3052;3205;3250;3502;3520;5023;5032;5203;5230;5302;5320
2035+2053+2305+2350+2503+2530+3025+3052+3205+3250+3502+3520+5023+5032+5203+5230+5302+5320=44563
.___.
ko tl đừng bl