Bài 1:

Số lượng số hạng của dãy số:

\(\left(1515-3\right):3+1=505\) (số hạng)

Tổng của dãy số:

\(\left(1515+1\right)\cdot505:2=382790\)

Bài 2: 

Số lượng số tự nhiên mà bình dùng là:

\(\left(2030-1\right):1+1=2030\) (số tự nhiên)

Giải thích các bước giải:

Số các số hạng trong dãy số bạn An viết là:

( 2018 - 2 ) : 7 + 1 = 289 ( số )

Tổng các số hạng trong dãy số bạn An viết là:

( 2018 + 1 ) x 42 : 2 = 291745,5

Trung bình cộng các số hạng trong dãy số bạn An viết là:

291890 : 289 = 1009,5 

Số các số hạng trong dãy số bạn An viết là:

( 2019 - 3 ) : 8 + 1 = 253 ( số )

Tổng các số hạng trong dãy số bạn An viết là:

( 2019 + 1 ) x 253 : 2 = 255530

Trung bình cộng các số hạng trong dãy số bạn An viết là:

291890 : 289 = 1010 

A = [170, 175, 160, 180, 165] # ví dụ dãy số đo chiều cao của lớp

n = len(A) # số lượng học sinh trong lớp

tong_chieu_cao = sum(A) # tổng số đo chiều cao của cả lớp

trung_binh_chieu_cao = tong_chieu_cao/n # số đo chiều cao trung bình của cả lớp

so_hs_tren_tb = 0 # số học sinh có chiều cao lớn hơn chiều cao trung bình của cả lớp

for i in range(n):

  if A[i] > trung_binh_chieu_cao:

   so_hs_tren_tb += 1

print("Số đo chiều cao trung bình của cả lớp là:", trung_binh_chieu_cao)

print("Số bạn có chiều cao lớn hơn chiều cao trung bình của cả lớp là:", so_hs_tren_tb)

tham khảo!

là số 29

29 ngu........................................................

không phải 29

là 14

1. Tổng 2 số là:

13 x 2 = 26

Tổng 3 số là:

11 x 3 = 33

Số thứ 3 là:

33 - 26 = 7

Đs: 7

2. 6 bài nha

3. Số đầu tiên của dãy số là 1001, số liền sau 1001 là 1011 nên số tiếp theo là 1021

Hiệu 2 số liền nhau là: 1011 - 1001 = 1021 - 1011 = 10 (đơn vị)

Từ số hạng đầu đén số hạng 101 có số khoảng cách là: 10 x 100 = 1000 (Đơn vị)

Số hạng cuối cùng là: 1001 + (101 - 1) x 10 = 2001

4. Số hạng 2001 là số 3945

5. Ta đc số hạng cuối cùng là = 1 + (200 - 1) * 2= 399

~~Hok tốt~

Program HOC24;

var i,n,d: integer;

t: real;

function nt(b: longint): boolean;

var j: longint;

begin

nt:=true;

if (b=2) or (b=3) then exit;

nt:=false;

if (b=1) or (b mod 2=0) or (b mod 3=0) then exit;

j:=5;

while j<=trunc(sqrt(b)) do

begin

if (b mod j=0) or (b mod (j+2)=0) then exit;

j:=j+6;

end;

nt:=true;

end;

begin

write('Nhap n: '); readln(n);

for i:=1 to n do 

begin

write('a[',i,']='); readln(a[i]);

end;

t:=0; d:=0;

for i:=1 to n do if nt(a[i]) then

begin

t:=t+a[i];

d:=d+1;

end;

write('Trung binh cong cac so nguyen to trong day: ',t/d:1:2);

readln

end.

Cách 2: 

uses crt;

var a:array[1..100]of integer;

i,n,t,dem,j,kt:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

dem:=0;

for i:=1 to n do 

  if a[i]>1 then 

begin

kt:=0;

for j:=2 to a[i]-1 do 

  if a[i] mod j=0 then kt:=1;

if kt=0 then 

begin

t:=t+a[i];

inc(dem);

end;

end;

writeln('Trung binh cong cac so nguyen to la: ',t/dem:4:2);

readln;

end.

uses crt;

var a:array[1..100]of integer;

i,n,t:integer;

begin

clrscr;

readln(n);

for i:=1 to n do

readln(a[i]);

for i:=1 to n do

write(a[i]:4);

writeln;

t:=0;

for i:=1 to n do

t:=t+a[i];

writeln(t);

writeln(t/n:4:2);

readln;

end.

Bạn ơi giúp mình với chiều nay mình thi rồi

Câu 2: 

uses crt;

var a:array[1..100]of integer;

i,n,tb:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

tb:=0;

for i:=1 to n do 

  tb:=tb+a[i];

writeln(tb/n:4:2);

readln;

end.