uses crt;
var i,t,n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
i:=1;
while i<=n do
begin
if i mod 2=1 then t:=t+i;
i:=i+1;
end;
writeln(t);
readln;
end.
Viết chương trình với số lần lặp chưa biết trước: a) 1+3+5+...+2n b) 2+4+6+...+(2n-1)
Viết chương trình tính tổng số chẵn với số lần lặp chưa biết trước: 2+4+6+...+2n
Câu 7: Nêu cú pháp câu lệnh lặp và cú pháp câu lệnh lặp với số lần chưa biết trước.
Câu 8: Viết chương trình tính tổng của N số tự nhiên đầu tiên, với N là số tự nhiên được nhập từ bàn phím.
Câu 9: Viết chương trình sử dụng lệnh lặp While..do để tính trung bình của n số thực x1, x2, x3,… xn. Các số n và x1, x2, x3,… xn được nhập vào từ bàn phím.
giupa nha các hảo hán !
Câu 1:Viết chương trình in ra các số nguyên tử 1→9 dùng vòng lặp While...do
Câu 2:Viết chương trình in ra màn hình 100 lần tên em
Câu 3:Viết chương trình tính tổng N số tự nhiên đầu tiên
Câu 4:Viết chương trình tính tính T=1+1/2+...+1/n
Câu 5:Vòng lặp sau cho biết kết quả S=? S:=0;For i:=1 to 5 do S :=S+2
Câu 6:Dòng lệnh sau thực hiện bao nhiêu vòng lặp For i:=5 to 10 do
Sử dụng vòng lặp với số lần biết trước (for...to...đo) viết chương trình tính tổng của N số tự nhiên đầu tiên T=1+2+3+...N.N là số nguyên được nhập từ bàn phím Giúp mình với mai mình nộp bài rồi🥺🥺
Viết chương trình tính tổng phương các số lẻ sau:
1^3+3^3+5^3+7^3+...+(2n–1)^3
Biết n nhập từ bàn phím là số nguyên dương
Câu 14: (3,0 điểm) Em hãy sử dụng câu lệnh lặp với số lần biết trước viết chương trinh Pascal để giải bài toán sau: Tính tổng S= 1 + 2 + 3 +...+n
1. Viết chương trình tính tích N=1*2*3*...*n (với n được nhập từ bàn phím)
2. Viết chương trình tính tổng A=1/1*3+1/2*4+1/3*5+...+1/n*(n+2)
3. Viết chương trình tính tổng số lẻ có trong dãy từ 0->n (n được nhập từ bàn phím)
4. Viết chương trình in ra màn hình các số chẵn có trong dãy từ 0->n (n được nhập từ bàn phím) và đếm có bao nhiêu số.
5. Viết chương trình in ra màn hình các số lẻ có trong dãy số từ 0->n (n được nhập từ bàn phím) và đếm có bao nhiêu số.
6. Viết chương trình nhập số nguyên n. Tìm và đưa ra màn hình các ước của n.
7. Viết chương trình in ra màn hình các bội của n ( n được nhập từ bàn phím)
8. Viết chương trình tính tổng S=1/1+1/2+1/3+...+1/n (n được nhập từ bàn phím)
viết chương trình tính tổng các số tự nhiên lẻ chia hết cho 5 và nhỏ hơn 1000 Hướng dẫn - i ban đầu = 5 - sau mỗi lần lặp 10, lên 10 (i = i thuộc 10 ) - Điều kiện cặp i < 1000
