uses crt;
var i,s:integer;
begin
clrscr;
s:=0;
for i:=1 to 50 do s:=s+i;
writeln(s);
readln;
end.
uses crt;
var i,s:integer;
begin
clrscr;
s:=0;
for i:=1 to 50 do s:=s+i;
writeln(s);
readln;
end.
sử dụng câu lệnh lặp for dođể viết lệnh cho bài toán tính tổng của N số tự nhiên đầu tiên
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 !
a)Viết cấu trúc điều kiện cho câu lệnh:125 là số không chia hết cho 5.
b)Viết đoạn chương trình tính tổng các số tự nhiên từ 1 đến 50 và in kết quả ra màn hình.
c)Nêu cú pháp của câu lệnh lặp For...do.
d)Nêu cú pháp của câu lệnh câu lệnh điều kiện thiếu và câu lệnh điều kiện đầy đủ.⚽
viết chương trình tính tổng các số tự nhiên từ 1 đến N. Với số N là số tự nhiên bất kì do người sử dụng nhập và N > 5 lưu ý: sử dụng câu lệnh lặp For...do
Bài toán tính tổng : S=1+1/2+1/3+...+1/100
a.Nêu thuật toán và viết chương trình sử dụng câu lệnh For...to...do
b.Nêu thuật toán và viết chương trình sử dụng câu lệnh While...do
hãy viết chương trình sử dụng lệnh lặp while-do, và for...to...do để tính tổng các số tự nhiên từ 1 đến 10.
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
Viết chương trình tính tổng nghịch đảo N số tự nhiên S= 1+1/2+1/3+...+1/N với N được nhập từ bàn phím. (sử dụng câu lệnh lặp for...do hoặc while...do...). Giúp e với ạ