var i,n,s:integer;
begin
readln(n); s:=0;
for i:=1 to 30 do
s:=s+i;
wirteln(s);
end.
Đúng 0
Bình luận (0)
Lập trình đơn giản
Các câu hỏi tương tự
viết chương trình tính tổng của 30 số tự nhiên đầu tiên
Viết chương trình tính tổng N số lẻ đầu tiên
viết chương trình tính tổng 100 số tự nhiên chẵn đầu tiên
Hãy viết chương trình tính tổng của 50 số tự nhiên đầu tiên.
Viết chương trình tính tổng các số chẵn của dãy 20 số tự nhiên đầu tiên (khác 0)
Xem chi tiết
Bài tập 1: Viết chứng trình tính tổng 3 số nguyên được nhập từ bàn phím
Bài tập 2: Viết chương trình nhập vào một số và in ra màn hình kết quả số chẵn hay số lẻ
Bài tập 3: Mô tả thuật toán tính tổng của 100 số tự nhiên đầu tiên
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
BH
12 tháng 5 2021 lúc 10:42
Câu 8. Viết thuật toán và chương trình hoàn chỉnh sử dụng câu lệnh For … do để tính tổng của 20 số tự nhiên đầu tiên S1+2+3+...+20 (3 điểm)Câu 9 (1 điểm). Cho đoạn chương trình: j: 2; For i: 1 to 5 do j: j + 2;Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?Giải thích?
Đọc tiếp
Câu 8. Viết thuật toán và chương trình hoàn chỉnh sử dụng câu lệnh For … do để tính tổng của 20 số tự nhiên đầu tiên S=1+2+3+...+20 (3 điểm)
Câu 9 (1 điểm). Cho đoạn chương trình: j:= 2;
For i:= 1 to 5 do j:= j + 2;
Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?
Giải thích?
Viết chương trình gồm n số nguyên(n<=30), tổng số lẻ trong mảng va in ra cac số lẻ đó
KH
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ó