Viết chương trình 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 từ bàn phím ( Sử dụng While....do)
Giúp mình với nhé❤️🍀
Những câu hỏi liên quan
:em hãy mô tả thuật toán sử dụng câu lệnh lặp While… do.để tính trung bình n số thực x1,x2,x3,x4….xn.và x1,x2,x3,x4…xn được nhập từ bàn phím
Bước 1: Nhập n và nhập dãy số
Bước 2: tb←0; i←1;
Bước 3: tb←tb+x[i];
Bước 4: i←i+1;
Bước 5: Nếu i<=n thì quay lại bước 3 và bước 4
Bước 6: Xuất tb/n;
Bước 7: Kết thúc
Đúng 0
Bình luận (0)
viết chương trình tìm số lớn nhất của n số nguyên x1, x2, x3,..., xn. các số x1, x2, x3,..., xn được nhập từ bàn phím
Viết chương trình tính và in ra tổng các số nguyên chia hết cho 3 trong dãy số nguyên X1, X2, X3, ...Xn biết dãy số X1, X2, X3, ... Xn được nhập từ bàn phím
var n:integer;
begin
write('Nhap n: '); readln(n);
if (n mod 3 =0) then
write(n,' chia het cho 3')
else
write(m,' k chia het cho 3');
readln;
end.
Đúng 0
Bình luận (0)
#include <bits/stdc++.h>
using namespace std;
long long x,n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1;i<=n; i++)
{
cin>>x;
if (x%3==0) t+=x;
}
cout<<t;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình tìm trung bình của n số thực x1,x2,...,xn được nhập từ bàn phím. Làm ơn giúp mình với!!!
uses crt;
var x:array[1..100]of real;
n,i:integer;
tb:real;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('X[',i,']='); readln(x[i]);
end;
tb:=0;
for i:=1 to n do
tb:=tb+x[i];
writeln(tb/n:4:2);
readln;
end.
Đúng 0
Bình luận (0)
viết chương trình sử dụng lệnh lặp While...do để tính trung bình n số thực x1,x2,x3,...xn đc nhập từ bàn phím
uses crt;
var n,i:integer;
kq,x: real;
begin
clrscr;
write('Nhap N: ');readln(n);
i:= 0; kq:= 0;
while i < n do
begin
i:= i + 1;
write('Nhap X ',i,': ');
readln(x);
kq:= kq + x;
end;
write('Trung binh ',n,' so thuc la: ',kq / n:0:2);
readln
end.
Viết chương trình tính tổng x1,x2,x3,...nhập vào từ bàn phím sao cho tổng nhỏ nhất lớn hơn 3500 (While...do)
program tim_tong;
uses crt;
var x,i,tong:longint;
begin
clrscr;
tong:=0;i:=1;
while tong<=3500 do
begin
write('x',i,'=');readln(x);
tong:=tong+x;
i:=i+1;
end;
write('tong cac so tren la:',tong);
readln;
end.
Đúng 1
Bình luận (0)
2: Viết chương trình sử dụng lệnh lặp để tính trung bình cộng của N số thực. Với số N và các số tính trung bình cộng được nhập vào từ bàn phím. Câu 3: Viết chương trình nhận biết một số tự nhiên N được nhập từ bàn phím có phải là số nguyên tố hay không.
Câu 3:
uses crt;
var n,i,kt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
if n>1 then
begin
kt:=0;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then kt:=1;
if kt=0 then writeln(n,' la so nguyen to')
else writeln(n,' la hop so');
end
else writeln(n,' khong la so nguyen to cung khong la hop so');
readln;
end.
Đúng 1
Bình luận (1)
viết chương trình sử dụng lệnh lặp for do để tính trung bình các số chẵn của n số thực các số n được nhập vào từ bàn phím
#include <bits/stdc++.h>
using namespace std;
int main()
{
int n,t=0,i,dem=0;
cin>>n;
for (int i=1; i<=n; i++)
if (i%2==0)
{
t=t+i;
dem++;
}
cout<<fixed<<setprecision(2)<<(t*1.0)/(dem*1.0);
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình sử dụng lệnh lặp while...do để tính điểm trung bình của N số nhập từ bàn phím?
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
i:=1;
while i<=n do
begin
t:=t+a[i];
inc(i);
end;
writeln(t/n:4:2);
readln;
end.
Đúng 1
Bình luận (0)