program bai1;
var n,i,s:longint;
begin
write('N= ');readln(n);
s:=0;i:=1;
repeat
s:=s+i;
i:=i+1;
until i>n;
writeln('Tong la ',s);
readln
end.
Đúng 0
Bình luận (0)
Lập trình đơn giản
Các câu hỏi tương tự
1Viết chương trình nhập số tự nhiên N từ bàn phím (N>0), tính giai thừa của N (N!)2Viết câu lệnh lặp for … do tính tổng các số lẻ trong phạm vi từ 1 đến 203Viết câu lệnh lặp for … do tính tổng các số chẵn trong phạm vi từ 1 đến 20
viết chương trình tính tổng của các số tự nhiên từ 1 đến 100 KHÔNG DÙNG LỆNH while do
Câu 1: Sử dụng vòng lặp for ... do, viết chương trình tính tổng của 10 số tự nhiên đầu tiên ?Câu 2: Viết chương trình tìm xem có bao nhiêu số dương trong N số nhập vào từ bàn phímCâu 3: Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, và dừng màn hình để có thể quan sát
Viết chương trình in ra ước chung lớn nhất của 2 số đc nhập từ bàn phím dùng lệnh while do và repeat until?
Em hãy viết chương trình tính tổng các số chẵn từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)
Em hãy viết chương trình tính tổng các số lẻ từ 1 đến N trong đó N là số được nhập từ bàn phím (N<=100)
16 tháng 3 2021 lúc 20:36
1. Viết chương trình tính tổng các số nguyên tố từ 1 đến 100 2.Số nguyên dương P được gọi là ước thực sự của số nguyên n nếu n chia hết cho P và P khác 1 và khadc chính số n . Viết thuật toán và chương trình nhập số tự nhiên n và tính tổng của nó
1.Viết cú pháp câu lệnh lặp. Cho VD?
2. Viết cú pháp cân bằng câu lệnh lặp chưa biết. Cho VD?
3.Viết chương trình in ra tổng các số chẵn nhỏ hơn hoặc bằng n (với n được nhập)
4. Viết chương trình in ra tổng các số lẻ nhỏ hơn hoặc bằng n ( với n được nhập)
5. Viết chương trình phép tính tổng của nhiều số (chưa biết số nào). Nhập số 0 để kết thúc quá trình nhập.
6. Kiểu dữ liệu mảng là gì? Viết cú pháp kiểu dữ liệu mảng?
Đọc tiếp
1.Viết cú pháp câu lệnh lặp. Cho VD?
2. Viết cú pháp cân bằng câu lệnh lặp chưa biết. Cho VD?
3.Viết chương trình in ra tổng các số chẵn nhỏ hơn hoặc bằng n (với n được nhập)
4. Viết chương trình in ra tổng các số lẻ nhỏ hơn hoặc bằng n ( với n được nhập)
5. Viết chương trình phép tính tổng của nhiều số (chưa biết số nào). Nhập số 0 để kết thúc quá trình nhập.
6. Kiểu dữ liệu mảng là gì? Viết cú pháp kiểu dữ liệu mảng?
Viết chương trình pascal tính trung bình cộng của 1;2;3;...;n với n nhập từ bàn phím
(Sử dịng câu lệnh while..do hoặc repeat.. until)