Cho số tự nhiên N. Đếm và tính tổng các chữ số của N.
INPUT:Số tự nhiên N
OUTPUT:Đưa ra số lượng và tổng các chữ số của N
VÍ DỤ
input

Question

Cho số tự nhiên N. Đếm và tính tổng các chữ số của N.
INPUT:Số tự nhiên N 
OUTPUT:Đưa ra số lượng và tổng các chữ số của N
VÍ DỤ 
input                                                                  output
4567                                                                   4     22
(pascal)

newborn · Answer

uses crt;var n,d,s: integer;beginclrscr;    readln(n);    d:=0; s:=0;    while n0 do begin        d:=d+1;        s:=s+n mod 10;        n:=n div 10;    end;    write(d,' ',s);    readlnend.

ThaiHuyy · Answer

uses crt;var n,d,s:integer;beginclrscr;write('nhap so n:');readln(n);while n0 dobegins:=s+n mod 10;d:=d+1;n:=n div 10;end;writeln(d);write(s);readln;end.

Cho số tự nhiên N. Đếm và tính tổng các chữ số của N. INPUT:Số tự nhiên N OUTPUT:Đưa ra số lượng và tổng các chữ số của N VÍ DỤ input output 4567 4 22 (pascal)

TRẢ LỜI

Bạn muốn hỏi điều gì?

Tham Gia Group Dành Cho Lớp 8 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Bạn muốn hỏi điều gì?

Tìm kiếm với hình ảnh

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Lưu vào

Cho số tự nhiên N. Đếm và tính tổng các chữ số của N. INPUT:Số tự nhiên N OUTPUT:Đưa ra số lượng và tổng các chữ số của N VÍ DỤ input output 4567 4 22 (pascal)

TRẢ LỜI

Bạn muốn hỏi điều gì?

Tham Gia Group Dành Cho Lớp 8 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí

Bạn muốn hỏi điều gì?

Lý do báo cáo vi phạm?