Hay nhập 5 số nguyên từ bàn phím rồi tính tổng 5 số nguyên do

1/

Program BTH;uses crt;var i,tong:byte;Begin        clrscr;        i:=0;        while i<5 do        begin                i:=i+1;                tong:=tong+i;        end;        writeln('Tong 5 so tu nhien dau tien: ',tong);        readln;

end.

2/

Program BTH;uses crt;var n,i:longint;Begin        clrscr;        write('Nhap n: '); readln(n);        for i:=1 to n do        if n mod i=0 then write(i,' ');        readln;

end.

Hay nhất

Cách For do

Program BTH;
uses crt;
var s,i:longint;
Begin
clrscr;
For i:=1 to 5 do s:=s+i;
writeln('Tong cac so tu 1 den 5 la: ',s);
readln;
end.

Cách While do

Program BTH;
uses crt;
var s,i:longint;
Begin
clrscr;
While i5 do
Begin
i:=i+1;
s:=s+i;
end;
writeln('Tong day so tu 1 den 5 la: ',s);
readln;
end.

uses crt;

var n,i,d,dem,kt,t,kt1,t1,t2,t3,max,min,x,j:integer;   

a,b:array[1..100]of integer;   

st:string;

begin

clrscr;

write('Nhap n='); readln(n);

str(n,st);

d:=length(st);

for i:=1 to d do 

val(st[i],a[i],x);

dem:=1;

b[1]:=a[1];

for i:=1 to d do 

begin     

kt:=0;     

for j:=1 to dem do       

if a[i]=b[j] then kt:=1;     

if kt=0 then       

begin           

inc(dem);           

b[dem]:=a[i];       

end; 

end;

writeln('Cac chu so cua ',n,' la: ');

for i:=1 to dem do 

write(b[i]:4);

writeln;

t:=0;

for i:=1 to d do 

t:=t+a[i];

writeln('Tong cac chu so cua ',n,' la: ',t);

kt1:=0;

for i:=2 to trunc(sqrt(t)) do 

if t mod i=0 then     

begin       

kt1:=1;       

break;     

end;

if (kt1=0) and (t>1) then writeln(t,' la so nguyen to')

else writeln(t,' khong la so nguyen to');

writeln('Cac chu so o vi tri le cua ',n,' la: ');

t1:=0;

for i:=1 to d do 

if i mod 2=1 then     

begin       

write(a[i]:4);       

t1:=t1+a[i];     

end;

writeln;

writeln('Tong cac chu so o vi tri le la: ',t1);

if trunc(sqrt(t1))=sqrt(t1) then writeln(t1,' la so chinh phuong')

else writeln(t1,' khong la so chinh phuong');

writeln('Cac chu so o vi tri chan cua ',n,' la: ');

t2:=0;

for i:=1 to d do 

if i mod 2=0 then     

begin       

write(a[i]:4);       

t2:=t2+a[i];     

end;

writeln('Tong cac chu so o vi tri chan la: ',t2);

t3:=0;

for i:=1 to t2 do 

if t2 mod i=0 then t3:=t3+i;

if (t3=t2) and (t2>0) then writeln(t2,' la so hoan hao')

else writeln(t2,' khong la so hoan hao');

max:=a[1];

min:=a[1];

for i:=1 to d do 

begin     

if max<a[i] then max:=a[i];     

if min>a[i] then min:=a[i]; 

end;

writeln('Chu so lon nhat cua ',n,' la: ',max);

writeln('Chu so nho nhat cua ',n,' la: ',min);

writeln('Tong cua chung la: ',max+min);

readln;

end.

Viết chương trình Tính tổng các chữ số trong một số n ? Đây là một bài tập khá hay :D, tuy nó cũng khá đơn giản thôi, nhưng cái mà nó mang lại cho chúng ta không hề giản đơn như chúng  ta nghĩ là đơn giản :v. Vậy thì bài tập này cho chúng ta những gì ? Hãy cũng mình tìm hiểu trong bài viết này nhé, mình xin được bắt đầu bài viết.

Bài toán tính tổng các chữ số trong một số

Đề bài: Trên ngôn ngữ lập trình C , hãy nhập vào một số nguyên dương n. Hãy viết chương trình Tính tổng các chữ số của n , in kết quả ra màn hình.

Như vậy, bài toán này sẽ giúp các bạn học được các kiến thức cơ bản nhất về nhập xuất trong lập trình C. Cách sử dụng vòng lặp toán tử chia dư, chia nguyên trong lập trình C.

Xác định input output:

input: Nhập n = 12345

output: s = 1 + 2 + 3 + 4 + 5

Ý tưởng :

  1. Khởi tạo một biến tachso để tách các chữ số của n bằng toán tử chia dư và một biến s để tính tổng bằng các số đã tách. Song song với tách số chúng ta sử dụng toán tử chia nguyên để xóa chữ số cuối của n
  2. Đặt chúng vào một vòng lặp for và chạy
  3. Đến đây thì f11 thôi 😀

Ok chỉ vậy thôi, bây giờ mình sẽ code và chú thích chi tiết ngay ở dưới.

#include<conio.h>

#include<stdio.h>

int main(){

    int n;

    int sotachra;

    int s = 0;

    printf("Nhap n: ");

    scanf("%d",&n);

    for(;n!=0;){

        sotachra = n % 10;

        s += sotachra;

        n /= 10;

    }    

    printf("%d",s);

}

Kết quả:

Okê xong rồi đấy :D, Vậy là mình đã giải quyết xong bài toán Tính tổng các chữ số trong một số n . Mình rất vui vì bạn đã tham khảo bài viết này của mình. Chúc bạn học tập thật tốt và từng bước từ newbie đi lên coder và trở thành developer hihi. Hãy nhớ là nền vững thì mới xây cao. Bọn mình và sếp sẽ luôn đồng hành cùng các bạn hehe. Các bạn cứ để lại bình luận nếu thắc mắc,  mình xin được kết thúc bài viết tại đây.

Xem thêm bài viết về C/C++ tại đây