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 )
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.
Gói VIP thi online tại VietJack (chỉ 400k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết
Yêu cầu: Cho 5 số kiểu 64 bit a, b, c, d, e. In ra YES nếu có ít nhất 4 số bằng nhau, in ra NO nếu không thỏa mãn.
Dữ liệu: Một dòng gồm 5 số nguyên a, b, c, d, e .
Kết quả: Ghi ra YES nếu có 4 số bằng nhau, ghi NO nếu ngược lại.
viết chương trình nhập vào 1 ký tự. in ra mã ASCII của ký tự đó và in ra ký tự kế tiếp của nó
viết chương trình pascal nhập 3 số a,b,c; kiểm tra xem nó có phải đọ dài 3 cạnh 1 tam giác hay không rồi in ra màn hình, nếu là 3 cạnh tam giác thì tính chu vi của tam giác đó
Viết chương trình nhập vào một xâu ký tự từ bàn phím. Đổi xâu ký tự đó sang chữ in hoa rồi in kết quả ra màn hình.
Ví dụ :Xâu abcdAbcD sẽ cho ra xâu ABCDABCD.
Viết chương trình nhập vào một xâu ký tự từ bàn phím. Đổi xâu ký tự đó sang chữ thường rồi in kết quả ra màn hình.
Ví dụ :Xâu abCdAbcD sẽ cho ra xâu abcdabcd.
viết chương trình nhập vào 1 dãy số nguyên gồm n phần tử. Tính tổng là các số chẵn và in các phần tử đó lên màn hình
Viết chương trình nhập vào 3 số a b c tìm số lớn nhất số bé nhất trong ba số đó c++
Viết chương trình nhập vào 3 giá trị nguyên dương a, b, c. Kiểm tra xem a, b, c có phải là 3 cạnh của tam giác không? Nếu là 3 cạnh của tam giác thì tính diện tích của tam giác theo công thức sau:
S = , với p là 1/2 chu vi của tam giác.
Hướng dẫn: a, b, c là 3 cạnh của tam giác phải thỏa điều kiện sau:
(a + b) > c và (a + c) > b và (b + c) > a