Tin học Tính tổng chữ số của số nguyên dương N

[Duy Quang Vũ 2007]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Cho số nguyên dương N có bốn chữ số. Hãy dùng các phép toán div và mod tính tổng chữ số của N. Dữ liệu nhập từ bàn phím. Kết quả đưa ra màn hình.

 

[Phạm Tùng]

Cho số nguyên dương N có bốn chữ số. Hãy dùng các phép toán div và mod tính tổng chữ số của N. Dữ liệu nhập từ bàn phím. Kết quả đưa ra màn hình.

Program skynet115;
uses crt;
var a,b,c,N:longint;
Begin
Writeln('Nhap gia tri cua N');Readln(N);
c:=(N mod 10);
a:=(N div 100);
b:=(N-100*a-c) div 10;
Write('Tong cac so cua N la' ,a+b+c);
Readln;
End.
hơi rắc rối chút vì mình học C++ chứ ko học pascal

 

[Duong 2007]

bạn tạo biến tổng
cộng với số cuối bằng mod sau đó loại bỏ số đó bằng div