Hãy viết chương trình sử dụng lệnh lặp While-Do để tính tổng các số lẻ từ 1 đến 50.
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.
* Sử dụng For ... do
Var i,s:integer;
Begin
For i:=1 to 10 do
s:=s+i;
Write('Tong la ',s);
Readln;
End.
* Sử dụng While ... do
Var i,s:integer;
Begin
i:=1;
While i<=10 do
Begin
s:=s+i;
i:=i+1;
End;
Write('tong la ',s);
Readln;
End.
Viết chương trình sử dụng lệnh lặp While…do để tính tổng các số lẻ có trong n số nguyên a1, a2, a3, …, an. Các số n và a1, a2, a3, …, an được nhập vào từ bàn phím.
Viết chương trình tính tổng các số tự nhiên từ 10 đến N. Với số N là số tự nhiên bất kì do người sử dụng nhập va N > 15. * Lưu ý: Sử dụng câu lệnh lặp While...do*
Program HOC24;
var i,n: integer;
t: longint;
begin
write('Nhap N: '); readln(n);
if n<=5 then write('So vua nhap chua lon hon 15') else
begin
t:=0; i:=10;
while i<=n do
begin
t:=t+i;
i:=i+1;
end;
end;
write('Tong la: ',t);
readln
end.
Câu 4: Cho S = 12 + 22 + 32 + … + n2, với n là một số tự nhiên nhập từ bàn phím. Hãy viết chương trình sử dụng lệnh lặp While…do để tính tổng trên?
uses crt;
var i,n,s:integer;
begin
clrscr;
readln(n);
s:=0;
i:=0;
while i<=n do
begin
i:=i+1;
s:=s+i*i;
end;
writeln(s);
readln;
end.
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 !
Hãy viết chương trình tính tổng các số tự nhiên chẵn từ 1 đến N( sử dụng lệnh While ... do )
có thể giải nhanh đc ko ạ
uses crt;
var i,n,t:integer;
begin
clrscr;
readln(n);
t:=0;
i:=0;
while i<=n do
begin
i:=i+1;
if i mod 2=0 then t:=t+i;
end;
writeln(t);
readln;
end.
Viết chương trình nhập vào từ bàn phím số nguyên dương n,sử dụng câu lệnh lặp và câu lệnh điều kiện để tính tổng các giá trị là số lẻ trong phạm vi từ 1 đến N,sau đó in ra màn hình
#include <bits/stdc++.h>
using namespace std;
long long n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
if (i%2!=0) t+=i;
cout<<t;
return 0;
}
viết chương trình tính tổng các số chẵn trong phạm vi từ 2 đến 50 thông báo kết quả ra màn hình bằng cách sử dụng vòng lặp while...do.
Program HOC24;
Uses crt;
var i,j: integer;
j:=1; i:=0;
while(j<=50) do
begin
j:=j+1;
if(j mod 2=0) then i:=i+j;
end;
writeln(i);
readln;
end.
sử dụng lệnh lặp while ...do để viết chương trình tính tổng
S=1/1+1/2+1/3+1/4+...+1/2n
program TinhTongWhileDo;
var
n, i: integer;
S: real;
begin
write('Nhap so n: ');
readln(n);
S := 0;
i := 1;
while i <= 2*n do
begin
S := S + 1/i;
i := i + 1;
end;
writeln('Tong S=1/1+1/2+1/3+1/4+...+1/2n la: ', S:0:2);
readln;
end.