Tìm số lớn nhất trong dãy A={96, 106, 47, 3}.
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.
Lời giải:
Coi $x$ là số hạng thứ 2014. Bạn nhớ công thức tìm số số hạng như sau:
$(x-2):2+1=2014$
Như vậy đương nhiên số hạng thứ 2014 là:
$x=(2014-1)\times 2+2$
Số 1 có ý nghĩa như vậy.
a, Khoảng cách 2 số hạng liên tiếp: 4 - 2 = 6 - 4 = 8 - 6 = 10 - 8 = 12 - 10 = 2
Số hạng thứ 2014 là: (2014 - 1 ) x 2 + 2 = 2013 x 2 + 2 = 4028
b, Hai số hạng liên tiếp có hiệu là 1 đơn vị
Số bé là: (2015 - 1):2= 1007
Số lớn là: 1007 +1 =1008
Đ.số:......
Uses crt;
var max,min,n,i,m,n: longint;
a: array[1..100] of longint
begin clrscr;
for i:=1 to n do begin
if(a[i] mod 2=0) then m:=m+a[i];
if(a[i] mod 2<>0) then n:=n+a[i];
end;
max:=a[1];
min:=a[1];
for i:=1 to n do begin
if(max<a[i]) then max:=a[i];
if(min>a[i]) then min:=a[i];
end;
Writeln('Tong cac phan tu chan: ',m);
Writeln('Tong cac phan tu le: ',n);
Writeln('Phan tu co gia tri lon nhat: ',max);
Writeln('Phan tu co gia tri nho nhat: ',min);
readln;
end.
Uses crt;
var max,min,n,i,m,n: longint;
a: array[1..100] of longint
begin clrscr;
for i:=1 to n do begin
if(a[i] mod 2=0) then m:=m+a[i];
if(a[i] mod 2<>0) then n:=n+a[i];
end;
max:=a[1];
min:=a[1];
for i:=1 to n do begin
if(max<a[i]) then max:=a[i];
if(min>a[i]) then min:=a[i];
end;
Writeln('Tong cac phan tu chan: ',m);
Writeln('Tong cac phan tu le: ',n);
Writeln('Phan tu co gia tri lon nhat: ',max);
Writeln('Phan tu co gia tri nho nhat: ',min);
readln;
end.
Max=106
giải chi tiết được không ạ