Nhập vào một số tự nhiên N. Hãy tính tổng các chữ số của nó

273

Top 1000 câu hỏi thường gặp môn Tin học có đáp án (phần 5) hay nhất được biên soạn và chọn lọc giúp bạn ôn luyện và đạt kết quả cao trong bài thi môn Tin học.

Nhập vào một số tự nhiên N. Hãy tính tổng các chữ số của nó

Câu 14: Nhập vào một số tự nhiên N. Hãy tính tổng các chữ số của nó.

Ví dụ: N = 1682.  Tong cac chu so cua N la: 17 ( = 1 + 6 + 8 + 2 )

Lời giải

Program tong;

Uses crt;

Var n , s , k: integer;                            // Khai bao bien su dung

Begin

    Write(‘ Nhap N:’);                           // Thong bao nhap lieu

    Readln(N );                                        // Nhap gtri cho N

    S := 0;

    While ( N <> 0 ) do                      // Lap trong khi N con ≠ 0

    Begin    

            k := N mod 10;                      // Lay chu so hang don vi o cuoi cung

            N :=  N div 10;                      // Cat chu so hang don vi da duoc lay ra

            S := S + k;                              // Tinh tong cong don vao S

    End;

    Writeln( ‘Tong cac chu so cua ’,N,’ la :’, S);   // Xuat ket qua

    Readln;

End.

Từ khóa :
Giải bài tập
Đánh giá

0

0 đánh giá