Điểm:
100
Thời gian:
1.0s
Bộ nhớ:
640M
Input:
bàn phím
Output:
màn hình
Viết chương trình nhập vào một số nguyên dương \(n\) (\(n \leq 1.000.000.000.000.000\)).
Hãy in ra các yêu cầu sau:
- Số chữ số của \(n\),
- Tổng các chữ số của \(n\).
Input
- Nhập số nguyên dương \(n\).
Output
- Dòng 1 in ra số chữ số của \(n\).
- Dòng 2 in ra tổng các chữ số của \(n\).
Example
Test 1
Input
4326
Output
4
15
Bình luận
Program bai26;
uses crt;
Var n:string;
a,T,x,b:Qword;
tk:longint;
begin
readln(n);
a:=length(n);
T:=0;
Val(n,x,tk);
While x>1 do
begin
b:=x mod 10;
T:=T+b;
x:=x div 10;
end;
writeln(a);
writeln(T);
readln;
end.
code đây nhé =))
Ngôn ngữ nào vậy bn