Số chẵn bé nhất có hai chữ số là : 10

Số chẵn lớn nhất có hai chữ số là : 98

Trung bình cộng của tất cả số chẵn có hai chữ số là:

              (98-10):2+1=45

                                                Đáp số : 45

Tổng 2 số là : 62 x 2 = 124

Số thứ nhất là : ( 124 + 24 ) : 2 = 74

Số thứ hai là : 124 - 74 = 54 

liên tiếp 4 chữ số nữa mà bạn

nói thẹc

cảm giác đề sai =))

có BTC, tìm tổng r làm theo tổng hiệu là ok

giờ lại lòi đâu ra tổng của 2 số chẵn liên tiếp 4 chữ số.

méo hiểu j =))

uses crt;

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

n,i,t1,t2: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;

for i:=1 to n do 

  if a[i] mod 2=0 then write(a[i]:4);

writeln;

for i:=1 to n do

  if a[i] mod 2<>0 then write(a[i]:4);

writeln;

t1:=0;

t2:=0;

for i:=1 to n do 

  begin

if a[i] mod 2=0 then t1:=t1+a[i]

else t2:=t2+a[i];

end;

writeln(t1);

writeln(t2);

readln;

end.

tổng các số là: 1 238*5=6 190

số chẵn thứ ba là:  6 190/5=1 238

số chẵn thứ hai là: 1 238-2=1 236

số chẵn thứ nhất là: 1 236-2=1 234

số chẵn thứ tư là: 1 238+2=1 240

số chẵn thứ năm là: 1 240+2=1 242

vậy các số chẵn đó là: 1 234; 1 236; 1 238; 1 240; 1 242

Program HOC24;

var d,i,n: integer;

t: real;

begin

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

for i:=1 to n do 

begin

write('Nhap so thu ',i,': '); readln(a[i]);

end;

d:=0; t:=0;

for i:=1 to n do

if a[i] mod 2=0 then 

begin

d:=d+1;

t:=t+a[i];

end;

t:=t/d;

writeln('Co ',d,' so chan trong mang');

writeln('Trung binh cong cac phan tu chan la: ',t:2:5);

write('Cac phan tu trong day theo chieu doc: ');

for i:=1 to n do writeln(a[i]);

readln

end.

Ta có dãy số có hai chữ số và chia hết cho 4 là: 12, 16, 20, 24, 28, 32, 36, 40, 44, 48, 52, 56, 60, 64, 68, 72, 76, 80, 84, 88, 92, 96.

Trung bình cộng của dãy số: (12 + 96 ) : 2 = 54

Đáp số: 54