Tin học Mấy bạn làm giúp mình bài này với: While-Tổng CS của n Viết một chương trình tính tổng các số trong một số nguyên được nhập từ bàn phím. 18/07/2021 By Audrey Mấy bạn làm giúp mình bài này với: While-Tổng CS của n Viết một chương trình tính tổng các số trong một số nguyên được nhập từ bàn phím. Mô tả đầu vào số n Mô tả đầu ra Tổng các chữ số của n
Mình thấy dùng lệnh while đó khó qua nên mình dùng for…do Code: program hoidap247;uses crt;var n,kq,i: integer; a: array [1..100] of integer;beginclrscr;kq:=0;write(‘Nhap tong cac so can tinh: ‘); readln(n);for i:=1 to n do begin write(‘Nhap so thu ‘,i,’: ‘); readln(a[i]); kq:=kq+a[i]; end; writeln(‘Tong cua ‘,i,’ so vua nhap la: ‘,kq); readlnend. Nếu ko đc thì mình sửa lại ạ 🙂 nhớ cho mình 5 sao và ctlhn ạ 😀 Trả lời