: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
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
30 tháng 3 2020
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.
Y
16 tháng 3 2022
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.
16 tháng 3 2022
#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;
}
4 tháng 5 2021
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.
5 tháng 7 2019
Câu hỏi của Thi Bùi - Toán lớp 7 - Học toán với OnlineMath
Bạn tham khảo link trên nhé!
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